home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-01-17 | 24.4 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 14 c8 99 22 48 | 6f 75 72 67 6c 61 73 73 |......"H|ourglass|
|00000010| 5f 4f 6e 22 0d 00 14 1d | c8 9b 20 22 3c 43 69 72 |_On"....|.. "<Cir|
|00000020| 63 24 44 69 72 3e 2e 44 | 72 61 77 42 61 73 69 63 |c$Dir>.D|rawBasic|
|00000030| 22 0d 00 1e 25 ee 20 85 | 20 f2 65 72 72 6f 72 28 |"...%. .| .error(|
|00000040| f6 24 2b 22 20 3a 20 61 | 74 20 6c 69 6e 65 20 22 |.$+" : a|t line "|
|00000050| 2b c3 9e 29 3a e0 0d 00 | 28 1e f4 20 2a 2a 2a 3e |+..):...|(.. ***>|
|00000060| 24 2e 21 43 69 72 63 75 | 69 74 2e 21 52 75 6e 49 |$.!Circu|it.!RunI|
|00000070| 6d 61 67 65 0d 00 32 47 | f4 20 2a 2a 2a 4d 61 69 |mage..2G|. ***Mai|
|00000080| 6e 20 50 72 6f 67 72 61 | 6d 20 66 6f 72 20 21 43 |n Progra|m for !C|
|00000090| 69 72 63 75 69 74 20 2d | 20 43 69 72 63 75 69 74 |ircuit -| Circuit|
|000000a0| 20 44 69 61 67 72 61 6d | 20 63 72 65 61 74 6f 72 | Diagram| creator|
|000000b0| 20 61 6e 64 20 65 64 69 | 74 6f 72 0d 00 3c 1f f4 | and edi|tor..<..|
|000000c0| 20 56 65 72 73 69 6f 6e | 20 31 2e 31 35 20 28 31 | Version| 1.15 (1|
|000000d0| 35 20 4a 61 6e 20 27 39 | 34 29 0d 00 46 19 f4 20 |5 Jan '9|4)..F.. |
|000000e0| 41 75 74 68 75 72 20 a9 | 20 4a 2e 20 52 6f 62 62 |Authur .| J. Robb|
|000000f0| 69 6e 73 0d 00 50 0d 73 | 66 69 6c 65 24 3d 22 22 |ins..P.s|file$=""|
|00000100| 0d 00 5a 25 c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |..Z%.."O|S_ReadMo|
|00000110| 64 65 56 61 72 69 61 62 | 6c 65 22 2c eb 2c 31 31 |deVariab|le",.,11|
|00000120| 20 b8 2c 2c 43 0d 00 64 | 25 c8 99 22 4f 53 5f 52 | .,,C..d|%.."OS_R|
|00000130| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00000140| 2c eb 2c 31 32 20 b8 2c | 2c 42 0d 00 6e 0d 43 2b |,.,12 .,|,B..n.C+|
|00000150| 3d 31 3a 42 2b 3d 31 0d | 00 78 29 e7 20 42 2f 43 |=1:B+=1.|.x). B/C|
|00000160| 3d 2e 38 20 80 20 eb 3c | 3e 31 33 20 8c 20 73 66 |=.8 . .<|>13 . sf|
|00000170| 69 6c 65 24 3d 22 53 70 | 72 69 74 65 73 32 37 22 |ile$="Sp|rites27"|
|00000180| 0d 00 82 2a e7 20 42 2f | 43 3d 2e 37 35 20 80 20 |...*. B/|C=.75 . |
|00000190| eb 3c 3e 31 33 20 8c 20 | 73 66 69 6c 65 24 3d 22 |.<>13 . |sfile$="|
|000001a0| 53 70 72 69 74 65 73 32 | 37 22 0d 00 8c 32 e7 20 |Sprites2|7"...2. |
|000001b0| 42 2f 43 3c 3e 2e 38 20 | 80 20 42 2f 43 3c 3e 2e |B/C<>.8 |. B/C<>.|
|000001c0| 37 35 20 84 20 eb 3d 31 | 33 20 73 66 69 6c 65 24 |75 . .=1|3 sfile$|
|000001d0| 3d 22 53 70 72 69 74 65 | 73 31 32 22 0d 00 96 18 |="Sprite|s12"....|
|000001e0| f2 6c 6f 61 64 73 70 72 | 69 74 65 73 28 73 66 69 |.loadspr|ites(sfi|
|000001f0| 6c 65 24 29 0d 00 a0 17 | c8 99 22 48 6f 75 72 67 |le$)....|.."Hourg|
|00000200| 6c 61 73 73 5f 53 6d 61 | 73 68 22 0d 00 aa 54 de |lass_Sma|sh"...T.|
|00000210| 20 62 6c 6f 63 6b 20 34 | 2a 31 30 32 34 2c 20 6d | block 4|*1024, m|
|00000220| 65 6e 75 25 20 31 30 32 | 34 2c 20 63 75 72 62 75 |enu% 102|4, curbu|
|00000230| 66 25 20 32 2e 35 2a 31 | 30 32 34 2c 20 69 63 6f |f% 2.5*1|024, ico|
|00000240| 6e 64 20 32 2a 31 30 32 | 34 2c 20 70 6f 69 6e 74 |nd 2*102|4, point|
|00000250| 25 20 32 35 2c 6d 62 6c | 6f 63 6b 20 35 31 32 0d |% 25,mbl|ock 512.|
|00000260| 00 b4 0e 6d 61 78 6c 65 | 76 25 3d 33 32 0d 00 be |...maxle|v%=32...|
|00000270| 23 de 20 73 74 61 72 74 | 25 28 6d 61 78 6c 65 76 |#. start|%(maxlev|
|00000280| 25 29 2c 62 6f 78 25 28 | 6d 61 78 6c 65 76 25 29 |%),box%(|maxlev%)|
|00000290| 0d 00 c8 35 de 20 6c 25 | 28 6d 61 78 6c 65 76 25 |...5. l%|(maxlev%|
|000002a0| 29 2c 62 25 28 6d 61 78 | 6c 65 76 25 29 2c 72 25 |),b%(max|lev%),r%|
|000002b0| 28 6d 61 78 6c 65 76 25 | 29 2c 74 25 28 6d 61 78 |(maxlev%|),t%(max|
|000002c0| 6c 65 76 25 29 0d 00 d2 | 3e de 20 70 73 65 74 24 |lev%)...|>. pset$|
|000002d0| 28 33 30 2c 33 30 29 2c | 74 65 78 74 69 6e 66 6f |(30,30),|textinfo|
|000002e0| 24 28 35 30 29 2c 70 25 | 20 31 30 2c 20 73 63 61 |$(50),p%| 10, sca|
|000002f0| 6c 20 32 30 2c 20 73 63 | 61 6c 62 6c 6f 63 6b 20 |l 20, sc|alblock |
|00000300| 32 35 35 0d 00 dc 29 de | 20 70 61 6c 65 74 74 65 |255...).| palette|
|00000310| 25 20 32 35 35 2c 64 65 | 66 70 61 6c 25 20 32 35 |% 255,de|fpal% 25|
|00000320| 35 2c 77 69 6e 70 61 6c | 28 31 35 29 0d 00 e6 3c |5,winpal|(15)...<|
|00000330| 65 6e 64 25 3d 2d 31 3a | 74 65 78 74 3d a3 3a 67 |end%=-1:|text=.:g|
|00000340| 72 69 64 78 3d 31 35 3a | 67 72 69 64 79 3d 38 3a |ridx=15:|gridy=8:|
|00000350| 74 6f 6f 6c 73 6f 6e 3d | b9 3a 73 68 75 74 64 6f |toolson=|.:shutdo|
|00000360| 77 6e 73 61 76 65 3d a3 | 0d 00 f0 19 65 6e 64 62 |wnsave=.|....endb|
|00000370| 75 66 25 3d 63 75 72 62 | 75 66 25 2b 26 36 30 30 |uf%=curb|uf%+&600|
|00000380| 30 0d 00 fa 32 74 6f 74 | 3d 2d 31 3a 66 6f 75 6e |0...2tot|=-1:foun|
|00000390| 64 3d a3 3a 73 61 76 65 | 64 3d a3 3a 70 72 65 71 |d=.:save|d=.:preq|
|000003a0| 75 69 74 73 61 76 65 3d | a3 3a 70 72 65 71 75 69 |uitsave=|.:prequi|
|000003b0| 74 3d a3 0d 01 04 1d 69 | 6e 3d a3 3a 73 74 61 72 |t=.....i|n=.:star|
|000003c0| 74 65 64 3d 30 3a 66 6f | 6e 74 6d 65 73 73 3d a3 |ted=0:fo|ntmess=.|
|000003d0| 0d 01 0e 0e e3 20 49 3d | 30 20 b8 20 31 35 0d 01 |..... I=|0 . 15..|
|000003e0| 18 0a f3 20 68 65 78 61 | 0d 01 22 12 77 69 6e 70 |... hexa|..".winp|
|000003f0| 61 6c 28 49 29 3d 68 65 | 78 61 0d 01 2c 16 64 65 |al(I)=he|xa..,.de|
|00000400| 66 70 61 6c 25 21 28 49 | 2a 34 29 3d 68 65 78 61 |fpal%!(I|*4)=hexa|
|00000410| 0d 01 36 05 ed 0d 01 40 | 50 dc 20 26 46 46 46 46 |..6....@|P. &FFFF|
|00000420| 46 46 31 30 2c 26 44 44 | 44 44 44 44 31 30 2c 26 |FF10,&DD|DDDD10,&|
|00000430| 42 42 42 42 42 42 31 30 | 2c 26 39 39 39 39 39 39 |BBBBBB10|,&999999|
|00000440| 31 30 2c 26 37 37 37 37 | 37 37 31 30 2c 26 35 35 |10,&7777|7710,&55|
|00000450| 35 35 35 35 31 30 2c 26 | 33 33 33 33 33 33 31 30 |555510,&|33333310|
|00000460| 2c 26 30 31 30 0d 01 4a | 49 dc 20 26 39 39 34 34 |,&010..J|I. &9944|
|00000470| 30 30 31 30 2c 26 45 45 | 45 45 31 30 2c 26 43 43 |0010,&EE|EE10,&CC|
|00000480| 30 30 31 30 2c 26 44 44 | 31 30 2c 26 42 42 45 45 |0010,&DD|10,&BBEE|
|00000490| 45 45 31 30 2c 26 38 38 | 35 35 31 30 2c 26 42 42 |EE10,&88|5510,&BB|
|000004a0| 46 46 31 30 2c 26 46 46 | 42 42 30 30 31 30 0d 01 |FF10,&FF|BB0010..|
|000004b0| 54 44 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |TD.. "Wi|mp_Initi|
|000004c0| 61 6c 69 73 65 22 2c 32 | 30 30 2c 26 34 42 35 33 |alise",2|00,&4B53|
|000004d0| 34 31 35 34 2c 22 21 43 | 69 72 63 75 69 74 22 20 |4154,"!C|ircuit" |
|000004e0| b8 20 76 65 72 73 69 6f | 6e 25 2c 6d 79 74 61 73 |. versio|n%,mytas|
|000004f0| 6b 25 0d 01 5e 24 c8 99 | 20 22 57 69 6d 70 5f 43 |k%..^$..| "Wimp_C|
|00000500| 6c 61 69 6d 49 6e 74 65 | 72 66 61 63 65 22 2c 6d |laimInte|rface",m|
|00000510| 79 74 61 73 6b 25 0d 01 | 68 0d f2 74 65 6d 70 6c |ytask%..|h..templ|
|00000520| 61 74 65 0d 01 72 52 c8 | 99 22 58 4f 53 5f 52 65 |ate..rR.|."XOS_Re|
|00000530| 61 64 56 61 72 56 61 6c | 22 2c 22 43 69 72 63 24 |adVarVal|","Circ$|
|00000540| 44 72 61 67 22 2c 62 6c | 6f 63 6b 2c 32 35 36 2c |Drag",bl|ock,256,|
|00000550| 30 2c 30 20 b8 20 2c 2c | 6c 65 6e 3a 62 6c 6f 63 |0,0 . ,,|len:bloc|
|00000560| 6b 3f 6c 65 6e 3d 31 33 | 3a 64 72 61 67 24 3d 24 |k?len=13|:drag$=$|
|00000570| 62 6c 6f 63 6b 0d 01 7c | 2a e7 20 64 72 61 67 24 |block..||*. drag$|
|00000580| 3d 22 54 52 55 45 22 20 | 8c 20 64 72 61 67 73 70 |="TRUE" |. dragsp|
|00000590| 72 3d b9 20 8b 20 64 72 | 61 67 73 70 72 3d a3 0d |r=. . dr|agspr=..|
|000005a0| 01 86 19 c8 99 20 22 4f | 53 5f 47 65 74 45 6e 76 |..... "O|S_GetEnv|
|000005b0| 22 20 b8 20 65 6e 76 24 | 0d 01 90 16 e7 20 a7 65 |" . env$|..... .e|
|000005c0| 6e 76 24 2c 22 2d 71 75 | 69 74 22 29 20 8c 0d 01 |nv$,"-qu|it") ...|
|000005d0| 9a 12 49 25 3d a7 65 6e | 76 24 2c 22 22 22 22 29 |..I%=.en|v$,"""")|
|000005e0| 0d 01 a4 17 49 25 3d a7 | 65 6e 76 24 2c 22 22 22 |....I%=.|env$,"""|
|000005f0| 22 2c 49 25 2b 31 29 0d | 01 ae 05 f5 0d 01 b8 09 |",I%+1).|........|
|00000600| 49 25 2b 3d 31 0d 01 c2 | 16 fd 20 c1 65 6e 76 24 |I%+=1...|.. .env$|
|00000610| 2c 49 25 2c 31 29 3c 3e | 22 20 22 0d 01 cc 12 65 |,I%,1)<>|" "....e|
|00000620| 6e 76 24 3d c1 65 6e 76 | 24 2c 49 25 29 0d 01 d6 |nv$=.env|$,I%)...|
|00000630| 05 cd 0d 01 e0 10 69 6e | 69 74 69 63 3d a4 69 63 |......in|itic=.ic|
|00000640| 6f 6e 0d 01 ea 2c 65 6e | 64 25 3d a3 3a 64 72 61 |on...,en|d%=.:dra|
|00000650| 67 25 3d 30 3a 64 72 69 | 76 65 25 3d 30 3a 74 6f |g%=0:dri|ve%=0:to|
|00000660| 6f 6c 24 3d 22 72 65 73 | 69 73 74 6f 72 22 0d 01 |ol$="res|istor"..|
|00000670| f4 33 73 69 7a 65 25 3d | 34 38 3a 66 6f 6e 74 25 |.3size%=|48:font%|
|00000680| 3d 2d 31 3a 66 61 6d 69 | 6c 79 25 3d 30 3a 73 74 |=-1:fami|ly%=0:st|
|00000690| 79 6c 65 25 3d 2d 31 3a | 6e 5f 66 6f 6e 74 25 3d |yle%=-1:|n_font%=|
|000006a0| 31 0d 01 fe 12 72 65 69 | 6e 74 65 72 3d 26 38 31 |1....rei|nter=&81|
|000006b0| 36 38 33 0d 02 08 15 f2 | 61 6c 74 65 72 77 69 6e |683.....|alterwin|
|000006c0| 28 31 35 2c 38 2c 30 29 | 0d 02 12 2a f2 69 6e 66 |(15,8,0)|...*.inf|
|000006d0| 6f 28 67 72 69 64 25 2c | 38 2c 22 38 22 29 3a f2 |o(grid%,|8,"8"):.|
|000006e0| 69 6e 66 6f 28 67 72 69 | 64 25 2c 35 2c 22 31 35 |info(gri|d%,5,"15|
|000006f0| 22 29 0d 02 1c 23 ee 20 | 85 20 f2 65 72 72 6f 72 |")...#. |. .error|
|00000700| 28 f6 24 2b 22 20 3a 20 | 61 74 20 6c 69 6e 65 20 |(.$+" : |at line |
|00000710| 22 2b c3 9e 29 0d 02 26 | 1a e7 20 65 6e 76 24 3c |"+..)..&|.. env$<|
|00000720| 3e 22 22 20 f2 6c 6f 61 | 64 28 65 6e 76 24 29 0d |>"" .loa|d(env$).|
|00000730| 02 30 05 f5 0d 02 3a 25 | c8 99 22 57 69 6d 70 5f |.0....:%|.."Wimp_|
|00000740| 50 6f 6c 6c 22 2c 30 2c | 62 6c 6f 63 6b 20 b8 20 |Poll",0,|block . |
|00000750| 65 76 65 6e 74 63 6f 64 | 65 0d 02 44 2d c8 99 20 |eventcod|e..D-.. |
|00000760| 22 57 69 6d 70 5f 50 6f | 6c 6c 50 6f 69 6e 74 65 |"Wimp_Po|llPointe|
|00000770| 72 22 2c 65 76 65 6e 74 | 63 6f 64 65 2c 2c 76 65 |r",event|code,,ve|
|00000780| 72 73 69 6f 6e 25 0d 02 | 4e 12 c8 8e 20 65 76 65 |rsion%..|N... eve|
|00000790| 6e 74 63 6f 64 65 20 ca | 0d 02 58 34 c9 20 30 3a |ntcode .|..X4. 0:|
|000007a0| e7 20 ac 20 73 61 76 65 | 64 20 80 20 70 72 65 71 |. . save|d . preq|
|000007b0| 75 69 74 20 c8 99 22 57 | 69 6d 70 5f 50 72 6f 63 |uit .."W|imp_Proc|
|000007c0| 65 73 73 4b 65 79 22 2c | 26 31 46 43 0d 02 62 18 |essKey",|&1FC..b.|
|000007d0| c9 20 31 3a f2 72 65 64 | 72 61 77 28 62 6c 6f 63 |. 1:.red|raw(bloc|
|000007e0| 6b 21 30 29 0d 02 6c 47 | c9 20 32 3a 77 69 6e 3d |k!0)..lG|. 2:win=|
|000007f0| 21 62 6c 6f 63 6b 3a e7 | 20 77 69 6e 3d 63 69 72 |!block:.| win=cir|
|00000800| 63 75 69 74 25 20 8c 20 | f2 70 61 6e 65 3a 8b 20 |cuit% . |.pane:. |
|00000810| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00000820| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 0d 02 76 11 c9 |dow",,bl|ock..v..|
|00000830| 20 33 3a f2 72 65 71 75 | 65 73 74 33 0d 02 80 41 | 3:.requ|est3...A|
|00000840| c9 20 34 3a 24 70 6f 69 | 6e 74 25 3d 22 70 74 72 |. 4:$poi|nt%="ptr|
|00000850| 5f 64 65 66 61 75 6c 74 | 22 3a c8 99 20 22 57 69 |_default|":.. "Wi|
|00000860| 6d 70 5f 53 70 72 69 74 | 65 4f 70 22 2c 33 36 2c |mp_Sprit|eOp",36,|
|00000870| 2c 70 6f 69 6e 74 25 2c | 31 2c 30 2c 30 0d 02 8a |,point%,|1,0,0...|
|00000880| 42 c9 20 35 3a e7 20 74 | 6f 6f 6c 24 3d 22 70 74 |B. 5:. t|ool$="pt|
|00000890| 72 5f 74 65 78 74 22 20 | 84 20 74 6f 6f 6c 24 3d |r_text" |. tool$=|
|000008a0| 22 70 74 72 5f 78 74 65 | 78 74 22 20 8c 20 78 3d |"ptr_xte|xt" . x=|
|000008b0| 30 3a 79 3d 30 3a 8b 20 | 78 3d 38 3a 79 3d 38 0d |0:y=0:. |x=8:y=8.|
|000008c0| 02 94 4a e7 20 62 6c 6f | 63 6b 21 30 3d 63 69 72 |..J. blo|ck!0=cir|
|000008d0| 63 75 69 74 25 20 8c 20 | 24 70 6f 69 6e 74 25 3d |cuit% . |$point%=|
|000008e0| 74 6f 6f 6c 24 3a c8 99 | 20 22 57 69 6d 70 5f 53 |tool$:..| "Wimp_S|
|000008f0| 70 72 69 74 65 4f 70 22 | 2c 33 36 2c 2c 70 6f 69 |priteOp"|,36,,poi|
|00000900| 6e 74 25 2c 31 2c 78 2c | 79 0d 02 9e 15 c9 20 36 |nt%,1,x,|y..... 6|
|00000910| 3a f2 63 6c 69 63 6b 28 | 62 6c 6f 63 6b 29 0d 02 |:.click(|block)..|
|00000920| a8 0c c9 20 37 3a f2 6f | 75 74 0d 02 b2 10 c9 20 |... 7:.o|ut..... |
|00000930| 38 3a f2 70 72 6f 63 65 | 73 73 0d 02 bc 0f c9 20 |8:.proce|ss..... |
|00000940| 39 3a f2 73 65 6c 65 63 | 74 0d 02 c6 16 c9 20 31 |9:.selec|t..... 1|
|00000950| 37 2c 31 38 3a f2 6d 65 | 73 73 61 67 65 69 6e 0d |7,18:.me|ssagein.|
|00000960| 02 d0 05 cb 0d 02 da 0a | fd 20 65 6e 64 25 0d 02 |........|. end%..|
|00000970| e4 0e dd f2 72 65 71 75 | 65 73 74 33 0d 02 ee 0f |....requ|est3....|
|00000980| c8 8e 20 21 62 6c 6f 63 | 6b 20 ca 0d 02 f8 71 c9 |.. !bloc|k ....q.|
|00000990| 20 65 6e 74 65 72 25 3a | c8 99 20 22 57 69 6d 70 | enter%:|.. "Wimp|
|000009a0| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|000009b0| 6c 6f 63 6b 3a 74 65 78 | 74 3d a3 3a 74 6f 6f 6c |lock:tex|t=.:tool|
|000009c0| 24 3d 6f 6c 64 74 6f 6f | 6c 24 3a 24 70 6f 69 6e |$=oldtoo|l$:$poin|
|000009d0| 74 25 3d 74 6f 6f 6c 24 | 3a c8 99 20 22 57 69 6d |t%=tool$|:.. "Wim|
|000009e0| 70 5f 53 70 72 69 74 65 | 4f 70 22 2c 33 36 2c 2c |p_Sprite|Op",36,,|
|000009f0| 70 6f 69 6e 74 25 2c 31 | 2c 38 2c 38 0d 03 02 58 |point%,1|,8,8...X|
|00000a00| c9 20 63 69 72 63 75 69 | 74 25 3a c8 99 20 22 57 |. circui|t%:.. "W|
|00000a10| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00000a20| 2c 2c 62 6c 6f 63 6b 3a | 21 62 6c 6f 63 6b 3d 74 |,,block:|!block=t|
|00000a30| 6f 6f 6c 62 6f 78 25 3a | c8 99 20 22 57 69 6d 70 |oolbox%:|.. "Wimp|
|00000a40| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00000a50| 6c 6f 63 6b 0d 03 0c 21 | c9 20 73 61 76 65 64 25 |lock...!|. saved%|
|00000a60| 3a e7 70 72 65 71 75 69 | 74 20 8c 20 70 72 65 71 |:.prequi|t . preq|
|00000a70| 75 69 74 3d a3 0d 03 16 | 35 c9 20 74 6f 6f 6c 62 |uit=....|5. toolb|
|00000a80| 6f 78 25 3a 74 6f 6f 6c | 73 6f 6e 3d a3 3a c8 99 |ox%:tool|son=.:..|
|00000a90| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00000aa0| 6f 77 22 2c 2c 62 6c 6f | 63 6b 0d 03 20 23 7f 20 |ow",,blo|ck.. #. |
|00000ab0| 3a c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |:.. "Wim|p_CloseW|
|00000ac0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 0d 03 2a |indow",,|block..*|
|00000ad0| 05 cb 0d 03 34 05 e1 0d | 03 3e 0a dd a4 69 63 6f |....4...|.>...ico|
|00000ae0| 6e 0d 03 48 0d 21 69 63 | 6f 6e 64 3d 2d 31 0d 03 |n..H.!ic|ond=-1..|
|00000af0| 52 0d 69 63 6f 6e 64 21 | 34 3d 30 0d 03 5c 25 69 |R.icond!|4=0..\%i|
|00000b00| 63 6f 6e 64 21 38 3d 30 | 3a 69 63 6f 6e 64 21 31 |cond!8=0|:icond!1|
|00000b10| 32 3d 36 38 3a 69 63 6f | 6e 64 21 31 36 3d 36 38 |2=68:ico|nd!16=68|
|00000b20| 0d 03 66 2b 69 63 6f 6e | 64 21 32 30 3d 25 31 31 |..f+icon|d!20=%11|
|00000b30| 30 31 30 2b 28 28 32 5e | 31 32 29 2a 33 29 3a 69 |010+((2^|12)*3):i|
|00000b40| 63 6f 6e 64 3f 32 33 3d | 31 31 32 0d 03 70 1e 24 |cond?23=|112..p.$|
|00000b50| 28 69 63 6f 6e 64 2b 32 | 34 29 3d 22 21 43 69 72 |(icond+2|4)="!Cir|
|00000b60| 63 75 69 74 22 2b bd 31 | 33 0d 03 7a 26 c8 99 20 |cuit"+.1|3..z&.. |
|00000b70| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|00000b80| 22 2c 2c 69 63 6f 6e 64 | 20 b8 20 69 63 6f 6e 0d |",,icond| . icon.|
|00000b90| 03 84 09 3d 69 63 6f 6e | 0d 03 8e 1a dd a4 73 70 |...=icon|......sp|
|00000ba0| 72 69 6e 66 6f 28 68 61 | 6e 64 6c 65 2c 69 63 6f |rinfo(ha|ndle,ico|
|00000bb0| 6e 29 0d 03 98 15 f2 67 | 65 65 28 68 61 6e 64 6c |n).....g|ee(handl|
|00000bc0| 65 2c 69 63 6f 6e 29 0d | 03 a2 0f 3d 28 69 63 6f |e,icon).|...=(ico|
|00000bd0| 6e 64 2b 32 38 29 0d 03 | ac 16 dd a4 69 6e 66 28 |nd+28)..|....inf(|
|00000be0| 68 61 6e 64 6c 65 2c 69 | 63 6f 6e 29 0d 03 b6 15 |handle,i|con)....|
|00000bf0| f2 67 65 65 28 68 61 6e | 64 6c 65 2c 69 63 6f 6e |.gee(han|dle,icon|
|00000c00| 29 0d 03 c0 0d 3d 69 63 | 6f 6e 64 21 32 38 0d 03 |)....=ic|ond!28..|
|00000c10| ca 0e 20 dd a4 62 69 74 | 28 61 24 29 0d 03 d4 11 |.. ..bit|(a$)....|
|00000c20| c8 95 20 a7 61 24 2c 22 | 3a 22 29 3e 30 0d 03 de |.. .a$,"|:")>0...|
|00000c30| 16 61 24 3d c1 61 24 2c | a7 61 24 2c 22 3a 22 29 |.a$=.a$,|.a$,":")|
|00000c40| 2b 31 29 0d 03 e8 05 ce | 0d 03 f2 11 c8 95 20 a7 |+1).....|...... .|
|00000c50| 61 24 2c 22 2e 22 29 3e | 30 0d 03 fc 16 61 24 3d |a$,".")>|0....a$=|
|00000c60| c1 61 24 2c a7 61 24 2c | 22 2e 22 29 2b 31 29 0d |.a$,.a$,|".")+1).|
|00000c70| 04 06 05 ce 0d 04 10 07 | 3d 61 24 0d 04 1a 11 dd |........|=a$.....|
|00000c80| a4 77 6f 6f 6c 28 77 6f | 6f 6c 25 29 0d 04 24 0a |.wool(wo|ol%)..$.|
|00000c90| ea 20 63 6f 74 24 0d 04 | 2e 12 20 c8 95 20 3f 77 |. cot$..|.. .. ?w|
|00000ca0| 6f 6f 6c 25 3e 3d 33 32 | 0d 04 38 13 63 6f 74 24 |ool%>=32|..8.cot$|
|00000cb0| 2b 3d bd 28 3f 77 6f 6f | 6c 25 29 0d 04 42 0c 77 |+=.(?woo|l%)..B.w|
|00000cc0| 6f 6f 6c 25 2b 3d 31 0d | 04 4c 05 ce 0d 04 56 09 |ool%+=1.|.L....V.|
|00000cd0| 3d 63 6f 74 24 0d 04 60 | 17 dd f2 6c 6f 61 64 73 |=cot$..`|...loads|
|00000ce0| 70 72 69 74 65 73 28 47 | 65 65 24 29 0d 04 6a 29 |prites(G|ee$)..j)|
|00000cf0| ff 28 22 49 63 6f 6e 73 | 70 72 69 74 65 73 20 3c |.("Icons|prites <|
|00000d00| 43 69 72 63 24 44 69 72 | 3e 2e 22 2b 47 65 65 24 |Circ$Dir|>."+Gee$|
|00000d10| 2b 22 21 22 29 0d 04 74 | 38 c8 99 20 22 4f 53 5f |+"!")..t|8.. "OS_|
|00000d20| 46 69 6c 65 22 2c 35 2c | 22 3c 43 69 72 63 24 44 |File",5,|"<Circ$D|
|00000d30| 69 72 3e 2e 22 2b 47 65 | 65 24 2b 22 21 22 20 b8 |ir>."+Ge|e$+"!" .|
|00000d40| 20 2c 2c 2c 2c 73 70 72 | 5f 6c 65 6e 25 0d 04 7e | ,,,,spr|_len%..~|
|00000d50| 17 73 70 72 5f 6c 65 6e | 25 3d 73 70 72 5f 6c 65 |.spr_len|%=spr_le|
|00000d60| 6e 25 2b 34 0d 04 88 13 | de 20 73 70 72 25 20 73 |n%+4....|. spr% s|
|00000d70| 70 72 5f 6c 65 6e 25 0d | 04 92 12 21 73 70 72 25 |pr_len%.|...!spr%|
|00000d80| 3d 73 70 72 5f 6c 65 6e | 25 0d 04 9c 32 c8 99 20 |=spr_len|%...2.. |
|00000d90| 22 4f 53 5f 46 69 6c 65 | 22 2c 32 35 35 2c 22 3c |"OS_File|",255,"<|
|00000da0| 43 69 72 63 24 44 69 72 | 3e 2e 22 2b 47 65 65 24 |Circ$Dir|>."+Gee$|
|00000db0| 2b 22 21 22 2c 73 70 72 | 25 2b 34 0d 04 a6 05 e1 |+"!",spr|%+4.....|
|00000dc0| 0d 04 b0 0e dd f2 74 65 | 6d 70 6c 61 74 65 0d 04 |......te|mplate..|
|00000dd0| ba 31 c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 54 65 |.1.."Wim|p_OpenTe|
|00000de0| 6d 70 6c 61 74 65 22 2c | 2c 22 3c 43 69 72 63 24 |mplate",|,"<Circ$|
|00000df0| 44 69 72 3e 2e 54 65 6d | 70 6c 61 74 65 73 22 0d |Dir>.Tem|plates".|
|00000e00| 04 c4 11 69 6e 64 69 72 | 3d 63 75 72 62 75 66 25 |...indir|=curbuf%|
|00000e10| 0d 04 ce 1f 69 6e 66 6f | 25 3d a4 74 65 6d 70 6c |....info|%=.templ|
|00000e20| 61 74 65 28 22 50 72 6f | 67 49 6e 66 6f 22 29 0d |ate("Pro|gInfo").|
|00000e30| 04 d8 1b 73 61 76 65 25 | 3d a4 74 65 6d 70 6c 61 |...save%|=.templa|
|00000e40| 74 65 28 22 73 61 76 65 | 22 29 0d 04 e2 20 73 61 |te("save|")... sa|
|00000e50| 76 65 64 25 3d a4 74 65 | 6d 70 6c 61 74 65 28 22 |ved%=.te|mplate("|
|00000e60| 73 61 76 65 74 65 78 74 | 22 29 0d 04 ec 21 63 69 |savetext|")...!ci|
|00000e70| 72 63 75 69 74 25 3d a4 | 74 65 6d 70 6c 61 74 65 |rcuit%=.|template|
|00000e80| 28 22 43 69 72 63 75 69 | 74 22 29 0d 04 f6 1d 74 |("Circui|t")....t|
|00000e90| 6f 6f 6c 73 25 3d a4 74 | 65 6d 70 6c 61 74 65 28 |ools%=.t|emplate(|
|00000ea0| 22 49 63 6f 6e 73 22 29 | 0d 05 00 1d 6c 69 6e 65 |"Icons")|....line|
|00000eb0| 73 25 3d a4 74 65 6d 70 | 6c 61 74 65 28 22 4c 49 |s%=.temp|late("LI|
|00000ec0| 4e 45 53 22 29 0d 05 0a | 1f 74 6f 6f 6c 62 6f 78 |NES")...|.toolbox|
|00000ed0| 25 3d a4 74 65 6d 70 6c | 61 74 65 28 22 54 4f 4f |%=.templ|ate("TOO|
|00000ee0| 4c 53 22 29 0d 05 14 1c | 65 6e 74 65 72 25 3d a4 |LS")....|enter%=.|
|00000ef0| 74 65 6d 70 6c 61 74 65 | 28 22 74 65 78 74 22 29 |template|("text")|
|00000f00| 0d 05 1e 1b 67 72 69 64 | 25 3d a4 74 65 6d 70 6c |....grid|%=.templ|
|00000f10| 61 74 65 28 22 73 69 7a | 65 22 29 0d 05 28 1d 71 |ate("siz|e")..(.q|
|00000f20| 75 65 72 79 25 3d a4 74 | 65 6d 70 6c 61 74 65 28 |uery%=.t|emplate(|
|00000f30| 22 71 75 65 72 79 22 29 | 0d 05 32 1e 71 75 69 74 |"query")|..2.quit|
|00000f40| 25 3d a4 74 65 6d 70 6c | 61 74 65 28 22 71 75 69 |%=.templ|ate("qui|
|00000f50| 74 62 6f 78 22 29 0d 05 | 3c 1f 73 63 72 6f 6c 6c |tbox")..|<.scroll|
|00000f60| 25 3d a4 74 65 6d 70 6c | 61 74 65 28 22 73 63 72 |%=.templ|ate("scr|
|00000f70| 6f 6c 6c 22 29 0d 05 46 | 1b c8 99 20 22 57 69 6d |oll")..F|... "Wim|
|00000f80| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00000f90| 0d 05 50 17 73 74 65 78 | 3d a4 69 6e 66 6f 28 73 |..P.stex|=.info(s|
|00000fa0| 61 76 65 25 2c 31 29 0d | 05 5a 19 73 74 65 78 64 |ave%,1).|.Z.stexd|
|00000fb0| 3d a4 69 6e 66 6f 28 73 | 61 76 65 64 25 2c 31 29 |=.info(s|aved%,1)|
|00000fc0| 0d 05 64 05 e1 0d 05 6e | 12 dd a4 74 65 6d 70 6c |..d....n|...templ|
|00000fd0| 61 74 65 28 61 24 29 0d | 05 78 46 c8 99 22 57 69 |ate(a$).|.xF.."Wi|
|00000fe0| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|00000ff0| 2c 2c 62 6c 6f 63 6b 2c | 69 6e 64 69 72 2c 65 6e |,,block,|indir,en|
|00001000| 64 62 75 66 25 2c 2d 31 | 2c 61 24 2c 30 20 b8 20 |dbuf%,-1|,a$,0 . |
|00001010| 2c 2c 69 6e 64 69 72 2c | 2c 2c 2c 63 25 0d 05 82 |,,indir,|,,,c%...|
|00001020| 32 e7 20 63 25 3d 30 20 | 8c 20 f2 6d 65 73 73 28 |2. c%=0 |. .mess(|
|00001030| 22 54 65 6d 70 6c 61 74 | 65 20 22 2b 61 24 2b 22 |"Templat|e "+a$+"|
|00001040| 20 6e 6f 74 20 66 6f 75 | 6e 64 2e 22 29 3a e0 0d | not fou|nd."):..|
|00001050| 05 8c 0e 62 6c 6f 63 6b | 21 36 34 3d 31 0d 05 96 |...block|!64=1...|
|00001060| 29 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |).."Wimp|_CreateW|
|00001070| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 20 b8 20 |indow",,|block . |
|00001080| 68 61 6e 64 6c 65 0d 05 | a0 0b 3d 68 61 6e 64 6c |handle..|..=handl|
|00001090| 65 0d 05 aa 17 dd a4 69 | 6e 66 6f 28 68 61 6e 64 |e......i|nfo(hand|
|000010a0| 6c 65 2c 69 63 6f 6e 29 | 0d 05 b4 15 f2 67 65 65 |le,icon)|.....gee|
|000010b0| 28 68 61 6e 64 6c 65 2c | 69 63 6f 6e 29 0d 05 be |(handle,|icon)...|
|000010c0| 0d 3d 69 63 6f 6e 64 21 | 32 38 0d 05 c8 1d dd f2 |.=icond!|28......|
|000010d0| 69 6e 66 6f 28 68 61 6e | 64 6c 65 2c 69 63 6f 6e |info(han|dle,icon|
|000010e0| 2c 74 65 78 74 24 29 0d | 05 d2 3b 21 62 6c 6f 63 |,text$).|..;!bloc|
|000010f0| 6b 3d 68 61 6e 64 6c 65 | 3a 62 6c 6f 63 6b 21 34 |k=handle|:block!4|
|00001100| 3d 69 63 6f 6e 3a c8 99 | 22 57 69 6d 70 5f 47 65 |=icon:..|"Wimp_Ge|
|00001110| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00001120| 63 6b 0d 05 dc 29 24 28 | 62 6c 6f 63 6b 21 32 38 |ck...)$(|block!28|
|00001130| 29 3d 74 65 78 74 24 3a | 62 6c 6f 63 6b 21 33 36 |)=text$:|block!36|
|00001140| 3d a9 28 74 65 78 74 24 | 29 2b 31 0d 05 e6 18 62 |=.(text$|)+1....b|
|00001150| 6c 6f 63 6b 21 38 3d 30 | 3a 62 6c 6f 63 6b 21 31 |lock!8=0|:block!1|
|00001160| 32 3d 30 0d 05 f0 20 c8 | 99 22 57 69 6d 70 5f 53 |2=0... .|."Wimp_S|
|00001170| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00001180| 6f 63 6b 0d 05 fa 05 e1 | 0d 06 04 20 dd f2 73 70 |ock.....|... ..sp|
|00001190| 72 69 6e 66 6f 28 68 61 | 6e 64 6c 65 2c 69 63 6f |rinfo(ha|ndle,ico|
|000011a0| 6e 2c 74 65 78 74 24 29 | 0d 06 0e 3b 21 62 6c 6f |n,text$)|...;!blo|
|000011b0| 63 6b 3d 68 61 6e 64 6c | 65 3a 62 6c 6f 63 6b 21 |ck=handl|e:block!|
|000011c0| 34 3d 69 63 6f 6e 3a c8 | 99 22 57 69 6d 70 5f 47 |4=icon:.|."Wimp_G|
|000011d0| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|000011e0| 6f 63 6b 0d 06 18 29 24 | 28 62 6c 6f 63 6b 21 32 |ock...)$|(block!2|
|000011f0| 38 29 3d 74 65 78 74 24 | 3a 62 6c 6f 63 6b 21 33 |8)=text$|:block!3|
|00001200| 36 3d a9 28 74 65 78 74 | 24 29 2b 31 0d 06 22 18 |6=.(text|$)+1..".|
|00001210| 62 6c 6f 63 6b 21 38 3d | 30 3a 62 6c 6f 63 6b 21 |block!8=|0:block!|
|00001220| 31 32 3d 30 0d 06 2c 20 | c8 99 22 57 69 6d 70 5f |12=0.., |.."Wimp_|
|00001230| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 62 |SetIconS|tate",,b|
|00001240| 6c 6f 63 6b 0d 06 36 05 | e1 0d 06 40 16 dd f2 67 |lock..6.|...@...g|
|00001250| 65 65 28 68 61 6e 64 6c | 65 2c 69 63 6f 6e 29 0d |ee(handl|e,icon).|
|00001260| 06 4a 1e 21 69 63 6f 6e | 64 3d 68 61 6e 64 6c 65 |.J.!icon|d=handle|
|00001270| 3a 69 63 6f 6e 64 21 34 | 3d 69 63 6f 6e 0d 06 54 |:icond!4|=icon..T|
|00001280| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e | .."Wimp|_GetIcon|
|00001290| 53 74 61 74 65 22 2c 2c | 69 63 6f 6e 64 0d 06 5e |State",,|icond..^|
|000012a0| 05 e1 0d 06 68 0c dd f2 | 63 6d 65 6e 75 73 0d 06 |....h...|cmenus..|
|000012b0| 72 10 6d 65 6e 75 6f 70 | 65 6e 3d 2d 34 34 0d 06 |r.menuop|en=-44..|
|000012c0| 7c 11 6d 65 6e 75 70 74 | 72 3d 6d 65 6e 75 25 0d ||.menupt|r=menu%.|
|000012d0| 06 86 0c c8 97 20 78 2c | 79 2c 62 0d 06 90 34 e7 |..... x,|y,b...4.|
|000012e0| 20 74 6f 6f 6c 73 6f 6e | 20 8c 20 74 6f 6f 6c 6f | toolson| . toolo|
|000012f0| 6e 24 3d 22 7b 80 7d 54 | 6f 6f 6c 73 22 3a 8b 20 |n$="{.}T|ools":. |
|00001300| 74 6f 6f 6c 6f 6e 24 3d | 22 54 6f 6f 6c 73 22 0d |toolon$=|"Tools".|
|00001310| 06 9a 3e 53 61 76 65 4d | 65 6e 75 25 3d a4 6d 65 |..>SaveM|enu%=.me|
|00001320| 6e 75 28 22 53 61 76 65 | 22 2c 31 37 34 2c 22 7b |nu("Save|",174,"{|
|00001330| 62 7c 73 61 76 65 25 7d | 44 72 61 77 2c 7b 62 7c |b|save%}|Draw,{b||
|00001340| 73 61 76 65 64 25 7d 44 | 61 74 61 22 29 0d 06 a4 |saved%}D|ata")...|
|00001350| 84 69 63 6f 6e 6d 65 6e | 75 25 3d a4 6d 65 6e 75 |.iconmen|u%=.menu|
|00001360| 28 22 21 43 69 72 63 75 | 69 74 22 2c 31 37 34 2c |("!Circu|it",174,|
|00001370| 22 7b 62 7c 69 6e 66 6f | 25 7d 49 6e 66 6f 2c 43 |"{b|info|%}Info,C|
|00001380| 69 72 63 75 69 74 2c 22 | 2b 74 6f 6f 6c 6f 6e 24 |ircuit,"|+toolon$|
|00001390| 2b 22 2c 4c 69 6e 65 73 | 2c 7b 62 7c 67 72 69 64 |+",Lines|,{b|grid|
|000013a0| 25 7d 53 69 7a 65 2c 7b | 62 7c 73 63 72 6f 6c 6c |%}Size,{|b|scroll|
|000013b0| 25 7d 53 63 72 6f 6c 6c | 2c 7b 62 7c 53 61 76 65 |%}Scroll|,{b|Save|
|000013c0| 4d 65 6e 75 25 7d 53 61 | 76 65 2c 51 75 69 74 22 |Menu%}Sa|ve,Quit"|
|000013d0| 29 0d 06 ae 1f e7 20 62 | 6c 6f 63 6b 21 31 32 3d |)..... b|lock!12=|
|000013e0| 2d 32 20 80 20 62 6c 6f | 63 6b 21 38 3d 32 20 8c |-2 . blo|ck!8=2 .|
|000013f0| 0d 06 b8 3d 6f 70 65 6e | 6d 65 6e 75 25 3d 69 63 |...=open|menu%=ic|
|00001400| 6f 6e 6d 65 6e 75 25 3a | 61 3d 78 2d 37 35 3a 62 |onmenu%:|a=x-75:b|
|00001410| 3d 28 38 2b 32 29 2a 34 | 38 3a f4 20 4e 6f 2e 20 |=(8+2)*4|8:. No. |
|00001420| 6f 66 20 69 74 65 6d 73 | 2b 32 2a 34 38 0d 06 c2 |of items|+2*48...|
|00001430| 21 cc 20 61 3d 78 3a 62 | 3d 79 3a 6f 70 65 6e 6d |!. a=x:b|=y:openm|
|00001440| 65 6e 75 25 3d 69 63 6f | 6e 6d 65 6e 75 25 0d 06 |enu%=ico|nmenu%..|
|00001450| cc 05 cd 0d 06 d6 12 f2 | 6f 70 65 6e 6d 65 6e 75 |........|openmenu|
|00001460| 28 61 2c 62 29 0d 06 e0 | 05 e1 0d 06 ea 13 dd f2 |(a,b)...|........|
|00001470| 6f 70 65 6e 6d 65 6e 75 | 28 78 2c 79 29 0d 06 f4 |openmenu|(x,y)...|
|00001480| 26 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |&.."Wimp|_CreateM|
|00001490| 65 6e 75 22 2c 2c 6f 70 | 65 6e 6d 65 6e 75 25 2c |enu",,op|enmenu%,|
|000014a0| 78 2c 79 0d 06 fe 05 e1 | 0d 07 08 1a dd a4 6d 65 |x,y.....|......me|
|000014b0| 6e 75 28 74 69 74 24 2c | 77 69 64 2c 6d 65 6e 75 |nu(tit$,|wid,menu|
|000014c0| 24 29 0d 07 12 0e 6d 65 | 6e 75 24 2b 3d 22 2c 22 |$)....me|nu$+=","|
|000014d0| 0d 07 1c 13 6f 6c 64 6d | 65 6e 75 3d 6d 65 6e 75 |....oldm|enu=menu|
|000014e0| 70 74 72 0d 07 26 11 24 | 6d 65 6e 75 70 74 72 3d |ptr..&.$|menuptr=|
|000014f0| 74 69 74 24 0d 07 30 10 | 6d 65 6e 75 70 74 72 3f |tit$..0.|menuptr?|
|00001500| 31 32 3d 37 0d 07 3a 10 | 6d 65 6e 75 70 74 72 3f |12=7..:.|menuptr?|
|00001510| 31 33 3d 32 0d 07 44 10 | 6d 65 6e 75 70 74 72 3f |13=2..D.|menuptr?|
|00001520| 31 34 3d 37 0d 07 4e 10 | 6d 65 6e 75 70 74 72 3f |14=7..N.|menuptr?|
|00001530| 31 35 3d 30 0d 07 58 12 | 6d 65 6e 75 70 74 72 21 |15=0..X.|menuptr!|
|00001540| 31 36 3d 77 69 64 0d 07 | 62 11 6d 65 6e 75 70 74 |16=wid..|b.menupt|
|00001550| 72 21 32 30 3d 34 38 0d | 07 6c 10 6d 65 6e 75 70 |r!20=48.|.l.menup|
|00001560| 74 72 21 32 34 3d 30 0d | 07 76 0f 6d 65 6e 75 70 |tr!24=0.|.v.menup|
|00001570| 74 72 2b 3d 32 38 0d 07 | 80 05 f5 0d 07 8a 11 f2 |tr+=28..|........|
|00001580| 74 68 69 6e 67 28 6d 65 | 6e 75 24 29 0d 07 94 1f |thing(me|nu$)....|
|00001590| 6d 65 6e 75 24 3d c1 6d | 65 6e 75 24 2c a7 6d 65 |menu$=.m|enu$,.me|
|000015a0| 6e 75 24 2c 22 2c 22 29 | 2b 31 29 0d 07 9e 0f 6d |nu$,",")|+1)....m|
|000015b0| 65 6e 75 70 74 72 2b 3d | 32 34 0d 07 a8 0e fd 20 |enuptr+=|24..... |
|000015c0| 6d 65 6e 75 24 3d 22 22 | 0d 07 b2 29 6d 65 6e 75 |menu$=""|...)menu|
|000015d0| 70 74 72 21 2d 32 34 3d | 28 6d 65 6e 75 70 74 72 |ptr!-24=|(menuptr|
|000015e0| 21 2d 32 34 29 20 84 20 | 25 31 30 30 30 30 30 30 |!-24) . |%1000000|
|000015f0| 30 0d 07 bc 0c 3d 6f 6c | 64 6d 65 6e 75 0d 07 c6 |0....=ol|dmenu...|
|00001600| 0f dd f2 74 68 69 6e 67 | 28 6d 24 29 0d 07 d0 16 |...thing|(m$)....|
|00001610| 6d 24 3d c0 6d 24 2c a7 | 6d 24 2c 22 2c 22 29 2d |m$=.m$,.|m$,",")-|
|00001620| 31 29 0d 07 da 0f 69 24 | 3d 22 22 3a 6a 24 3d 22 |1)....i$|="":j$="|
|00001630| 22 0d 07 e4 12 e7 20 a7 | 6d 24 2c 22 7b 22 29 3e |"..... .|m$,"{")>|
|00001640| 30 20 8c 0d 07 ee 16 69 | 24 3d c0 6d 24 2c a7 6d |0 .....i|$=.m$,.m|
|00001650| 24 2c 22 7d 22 29 2d 31 | 29 0d 07 f8 16 6d 24 3d |$,"}")-1|)....m$=|
|00001660| c1 6d 24 2c a7 6d 24 2c | 22 7d 22 29 2b 31 29 0d |.m$,.m$,|"}")+1).|
|00001670| 08 02 16 6a 24 3d c0 69 | 24 2c a7 69 24 2c 22 7c |...j$=.i|$,.i$,"||
|00001680| 22 29 2d 31 29 0d 08 0c | 16 69 24 3d c1 69 24 2c |")-1)...|.i$=.i$,|
|00001690| a7 69 24 2c 22 7c 22 29 | 2b 31 29 0d 08 16 05 cd |.i$,"|")|+1).....|
|000016a0| 0d 08 20 13 69 6a 61 63 | 6b 3d 26 30 37 30 30 30 |.. .ijac|k=&07000|
|000016b0| 30 32 31 0d 08 2a 0b 6d | 6a 61 63 6b 3d 30 0d 08 |021..*.m|jack=0..|
|000016c0| 34 0e 73 75 62 6d 65 6e | 75 3d 2d 31 0d 08 3e 20 |4.submen|u=-1..> |
|000016d0| e7 20 a7 6a 24 2c 22 62 | 22 29 3e 30 20 8c 20 73 |. .j$,"b|")>0 . s|
|000016e0| 75 62 6d 65 6e 75 3d a0 | 28 69 24 29 0d 08 48 22 |ubmenu=.|(i$)..H"|
|000016f0| e7 20 a7 6a 24 2c 22 5f | 22 29 3e 30 20 8c 20 6d |. .j$,"_|")>0 . m|
|00001700| 6a 61 63 6b 3d 6d 6a 61 | 63 6b 20 84 20 32 0d 08 |jack=mja|ck . 2..|
|00001710| 52 22 e7 20 a7 6a 24 2c | 22 80 22 29 3e 30 20 8c |R". .j$,|".")>0 .|
|00001720| 20 6d 6a 61 63 6b 3d 6d | 6a 61 63 6b 20 84 20 31 | mjack=m|jack . 1|
|00001730| 0d 08 5c 30 e7 20 a7 6a | 24 2c 22 75 22 29 3e 30 |..\0. .j|$,"u")>0|
|00001740| 20 8c 20 6d 6a 61 63 6b | 3d 6d 6a 61 63 6b 20 84 | . mjack|=mjack .|
|00001750| 20 32 3a 73 75 62 6d 65 | 6e 75 3d a0 28 69 24 29 | 2:subme|nu=.(i$)|
|00001760| 0d 08 66 12 21 6d 65 6e | 75 70 74 72 3d 6d 6a 61 |..f.!men|uptr=mja|
|00001770| 63 6b 0d 08 70 15 6d 65 | 6e 75 70 74 72 21 34 3d |ck..p.me|nuptr!4=|
|00001780| 73 75 62 6d 65 6e 75 0d | 08 7a 13 6d 65 6e 75 70 |submenu.|.z.menup|
|00001790| 74 72 21 38 3d 69 6a 61 | 63 6b 0d 08 84 14 24 28 |tr!8=ija|ck....$(|
|000017a0| 6d 65 6e 75 70 74 72 2b | 31 32 29 3d 6d 24 0d 08 |menuptr+|12)=m$..|
|000017b0| 8e 05 cd 0d 08 98 05 e1 | 0d 08 a2 12 dd f2 63 6c |........|......cl|
|000017c0| 69 63 6b 28 62 6c 6f 63 | 6b 29 0d 08 ac 13 6b 65 |ick(bloc|k)....ke|
|000017d0| 65 70 62 25 3d 62 6c 6f | 63 6b 21 31 32 0d 08 b6 |epb%=blo|ck!12...|
|000017e0| 2a e7 20 a4 63 68 65 63 | 6b 69 74 28 62 6c 6f 63 |*. .chec|kit(bloc|
|000017f0| 6b 21 31 32 2c 62 6c 6f | 63 6b 21 31 36 29 3d 39 |k!12,blo|ck!16)=9|
|00001800| 38 33 30 34 30 20 8c 0d | 08 c0 24 f2 73 6c 61 62 |83040 ..|..$.slab|
|00001810| 69 6e 28 6b 65 65 70 62 | 25 29 3a f2 73 6c 61 62 |in(keepb|%):.slab|
|00001820| 6f 75 74 28 6b 65 65 70 | 62 25 29 0d 08 ca 05 cd |out(keep|b%).....|
|00001830| 0d 08 d4 2b e7 20 73 68 | 75 74 64 6f 77 6e 73 61 |...+. sh|utdownsa|
|00001840| 76 65 20 8c 20 71 75 69 | 74 69 6e 3d a3 3a f2 63 |ve . qui|tin=.:.c|
|00001850| 6c 6f 73 65 28 71 75 69 | 74 25 29 0d 08 de 27 e7 |lose(qui|t%)...'.|
|00001860| 20 62 6c 6f 63 6b 21 31 | 32 3d 2d 32 20 80 20 62 | block!1|2=-2 . b|
|00001870| 6c 6f 63 6b 21 38 3d 32 | 20 f2 63 6d 65 6e 75 73 |lock!8=2| .cmenus|
|00001880| 3a e1 0d 08 e8 36 e7 20 | 62 6c 6f 63 6b 21 31 32 |:....6. |block!12|
|00001890| 3d 2d 32 20 80 20 62 6c | 6f 63 6b 21 38 3d 34 20 |=-2 . bl|ock!8=4 |
|000018a0| f2 6f 70 65 6e 77 69 6e | 28 63 69 72 63 75 69 74 |.openwin|(circuit|
|000018b0| 25 29 3a f2 70 61 6e 65 | 0d 08 f2 51 e7 20 62 6c |%):.pane|...Q. bl|
|000018c0| 6f 63 6b 21 31 32 3d 73 | 61 76 65 25 20 80 20 62 |ock!12=s|ave% . b|
|000018d0| 6c 6f 63 6b 21 31 36 3d | 32 20 77 69 6e 73 61 76 |lock!16=|2 winsav|
|000018e0| 65 25 3d 62 6c 6f 63 6b | 21 31 32 3a 66 69 6c 65 |e%=block|!12:file|
|000018f0| 74 79 70 65 24 3d 22 66 | 69 6c 65 5f 41 46 46 22 |type$="f|ile_AFF"|
|00001900| 3a f2 64 65 66 73 61 76 | 65 0d 08 fc 52 e7 20 62 |:.defsav|e...R. b|
|00001910| 6c 6f 63 6b 21 31 32 3d | 73 61 76 65 64 25 20 80 |lock!12=|saved% .|
|00001920| 20 62 6c 6f 63 6b 21 31 | 36 3d 32 20 77 69 6e 73 | block!1|6=2 wins|
|00001930| 61 76 65 25 3d 62 6c 6f | 63 6b 21 31 32 3a 66 69 |ave%=blo|ck!12:fi|
|00001940| 6c 65 74 79 70 65 24 3d | 22 66 69 6c 65 5f 30 30 |letype$=|"file_00|
|00001950| 43 22 3a f2 64 65 66 73 | 61 76 65 0d 09 06 4d e7 |C":.defs|ave...M.|
|00001960| 20 62 6c 6f 63 6b 21 31 | 32 3d 73 61 76 65 25 20 | block!1|2=save% |
|00001970| 80 20 62 6c 6f 63 6b 21 | 31 36 3d 30 20 77 69 6e |. block!|16=0 win|
|00001980| 73 61 76 65 25 3d 62 6c | 6f 63 6b 21 31 32 3a f2 |save%=bl|ock!12:.|
|00001990| 73 61 76 65 28 24 a4 69 | 6e 66 6f 28 77 69 6e 73 |save($.i|nfo(wins|
|000019a0| 61 76 65 25 2c 31 29 29 | 0d 09 10 4e e7 20 62 6c |ave%,1))|...N. bl|
|000019b0| 6f 63 6b 21 31 32 3d 73 | 61 76 65 64 25 20 80 20 |ock!12=s|aved% . |
|000019c0| 62 6c 6f 63 6b 21 31 36 | 3d 30 20 77 69 6e 73 61 |block!16|=0 winsa|
|000019d0| 76 65 25 3d 62 6c 6f 63 | 6b 21 31 32 3a f2 73 61 |ve%=bloc|k!12:.sa|
|000019e0| 76 65 28 24 a4 69 6e 66 | 6f 28 77 69 6e 73 61 76 |ve($.inf|o(winsav|
|000019f0| 65 25 2c 31 29 29 0d 09 | 1a 2e e7 20 62 6c 6f 63 |e%,1))..|... bloc|
|00001a00| 6b 21 31 32 3d 67 72 69 | 64 25 20 80 20 62 6c 6f |k!12=gri|d% . blo|
|00001a10| 63 6b 21 31 36 3d 37 20 | 8c 20 f2 67 72 69 64 28 |ck!16=7 |. .grid(|
|00001a20| 30 2c 38 29 0d 09 24 2e | e7 20 62 6c 6f 63 6b 21 |0,8)..$.|. block!|
|00001a30| 31 32 3d 67 72 69 64 25 | 20 80 20 62 6c 6f 63 6b |12=grid%| . block|
|00001a40| 21 31 36 3d 36 20 8c 20 | f2 67 72 69 64 28 31 2c |!16=6 . |.grid(1,|
|00001a50| 38 29 0d 09 2e 2e e7 20 | 62 6c 6f 63 6b 21 31 32 |8)..... |block!12|
|00001a60| 3d 67 72 69 64 25 20 80 | 20 62 6c 6f 63 6b 21 31 |=grid% .| block!1|
|00001a70| 36 3d 33 20 8c 20 f2 67 | 72 69 64 28 32 2c 35 29 |6=3 . .g|rid(2,5)|
|00001a80| 0d 09 38 2e e7 20 62 6c | 6f 63 6b 21 31 32 3d 67 |..8.. bl|ock!12=g|
|00001a90| 72 69 64 25 20 80 20 62 | 6c 6f 63 6b 21 31 36 3d |rid% . b|lock!16=|
|00001aa0| 34 20 8c 20 f2 67 72 69 | 64 28 33 2c 35 29 0d 09 |4 . .gri|d(3,5)..|
|00001ab0| 42 32 e7 20 62 6c 6f 63 | 6b 21 31 32 3d 73 63 72 |B2. bloc|k!12=scr|
|00001ac0| 6f 6c 6c 25 20 80 20 62 | 6c 6f 63 6b 21 31 36 3d |oll% . b|lock!16=|
|00001ad0| 31 20 8c 20 f2 73 63 72 | 6f 6c 6c 28 30 2c 31 29 |1 . .scr|oll(0,1)|
|00001ae0| 0d 09 4c 33 e7 20 62 6c | 6f 63 6b 21 31 32 3d 73 |..L3. bl|ock!12=s|
|00001af0| 63 72 6f 6c 6c 25 20 80 | 20 62 6c 6f 63 6b 21 31 |croll% .| block!1|
|00001b00| 36 3d 32 20 8c 20 f2 73 | 63 72 6f 6c 6c 28 30 2c |6=2 . .s|croll(0,|
|00001b10| 2d 31 29 0d 09 56 32 e7 | 20 62 6c 6f 63 6b 21 31 |-1)..V2.| block!1|
|00001b20| 32 3d 73 63 72 6f 6c 6c | 25 20 80 20 62 6c 6f 63 |2=scroll|% . bloc|
|00001b30| 6b 21 31 36 3d 33 20 8c | 20 f2 73 63 72 6f 6c 6c |k!16=3 .| .scroll|
|00001b40| 28 31 2c 30 29 0d 09 60 | 33 e7 20 62 6c 6f 63 6b |(1,0)..`|3. block|
|00001b50| 21 31 32 3d 73 63 72 6f | 6c 6c 25 20 80 20 62 6c |!12=scro|ll% . bl|
|00001b60| 6f 63 6b 21 31 36 3d 34 | 20 8c 20 f2 73 63 72 6f |ock!16=4| . .scro|
|00001b70| 6c 6c 28 2d 31 2c 30 29 | 0d 09 6a 3f e7 20 62 6c |ll(-1,0)|..j?. bl|
|00001b80| 6f 63 6b 21 31 32 3d 74 | 6f 6f 6c 73 25 20 8c 20 |ock!12=t|ools% . |
|00001b90| 74 6f 6f 6c 24 3d 24 a4 | 73 70 72 69 6e 66 6f 28 |tool$=$.|sprinfo(|
|00001ba0| 74 6f 6f 6c 73 25 2c 62 | 6c 6f 63 6b 21 31 36 29 |tools%,b|lock!16)|
|00001bb0| 3a 74 65 78 74 3d a3 0d | 09 74 71 e7 20 62 6c 6f |:text=..|.tq. blo|
|00001bc0| 63 6b 21 31 32 3d 63 69 | 72 63 75 69 74 25 20 80 |ck!12=ci|rcuit% .|
|00001bd0| 20 62 6c 6f 63 6b 21 38 | 3d 34 20 80 20 ac 20 74 | block!8|=4 . . t|
|00001be0| 65 78 74 20 80 20 74 6f | 6f 6c 24 3c 3e 22 70 74 |ext . to|ol$<>"pt|
|00001bf0| 72 5f 78 74 65 78 74 22 | 20 8c 20 76 78 3d 62 6c |r_xtext"| . vx=bl|
|00001c00| 6f 63 6b 21 30 3a 76 79 | 3d 62 6c 6f 63 6b 21 34 |ock!0:vy|=block!4|
|00001c10| 3a f2 64 6f 69 74 28 76 | 78 2c 76 79 2c 62 6c 6f |:.doit(v|x,vy,blo|
|00001c20| 63 6b 21 31 32 29 3a e1 | 0d 09 7e 43 e7 20 62 6c |ck!12):.|..~C. bl|
|00001c30| 6f 63 6b 21 31 32 3d 63 | 69 72 63 75 69 74 25 20 |ock!12=c|ircuit% |
|00001c40| 80 20 62 6c 6f 63 6b 21 | 38 3d 34 20 80 20 74 65 |. block!|8=4 . te|
|00001c50| 78 74 20 f2 64 6f 74 65 | 78 74 28 62 6c 6f 63 6b |xt .dote|xt(block|
|00001c60| 21 30 2c 62 6c 6f 63 6b | 21 34 29 0d 09 88 5f e7 |!0,block|!4)..._.|
|00001c70| 20 62 6c 6f 63 6b 21 31 | 32 3d 63 69 72 63 75 69 | block!1|2=circui|
|00001c80| 74 25 20 80 20 62 6c 6f | 63 6b 21 38 3d 31 20 80 |t% . blo|ck!8=1 .|
|00001c90| 20 74 6f 6f 6c 24 3d 22 | 70 74 72 5f 78 74 65 78 | tool$="|ptr_xtex|
|00001ca0| 74 22 20 8c 20 76 78 3d | 62 6c 6f 63 6b 21 30 3a |t" . vx=|block!0:|
|00001cb0| 76 79 3d 62 6c 6f 63 6b | 21 34 3a f2 64 65 6c 74 |vy=block|!4:.delt|
|00001cc0| 65 78 74 28 76 78 2c 76 | 79 29 0d 09 92 2d e7 20 |ext(vx,v|y)...-. |
|00001cd0| 62 6c 6f 63 6b 21 31 32 | 3d 63 69 72 63 75 69 74 |block!12|=circuit|
|00001ce0| 25 20 80 20 62 6c 6f 63 | 6b 21 38 3d 32 20 8c 20 |% . bloc|k!8=2 . |
|00001cf0| f2 63 6d 65 6e 75 73 0d | 09 9c 3f e7 20 62 6c 6f |.cmenus.|..?. blo|
|00001d00| 63 6b 21 31 32 3d 6c 69 | 6e 65 73 25 20 8c 20 74 |ck!12=li|nes% . t|
|00001d10| 6f 6f 6c 24 3d 24 a4 73 | 70 72 69 6e 66 6f 28 6c |ool$=$.s|prinfo(l|
|00001d20| 69 6e 65 73 25 2c 62 6c | 6f 63 6b 21 31 36 29 3a |ines%,bl|ock!16):|
|00001d30| 74 65 78 74 3d a3 0d 09 | a6 68 e7 20 62 6c 6f 63 |text=...|.h. bloc|
|00001d40| 6b 21 31 32 3d 63 69 72 | 63 75 69 74 25 20 80 20 |k!12=cir|cuit% . |
|00001d50| 62 6c 6f 63 6b 21 38 3d | 31 20 80 20 ac 20 74 65 |block!8=|1 . . te|
|00001d60| 78 74 20 80 20 74 6f 6f | 6c 24 3c 3e 22 70 74 72 |xt . too|l$<>"ptr|
|00001d70| 5f 78 74 65 78 74 22 20 | 8c 20 f2 63 6c 65 61 72 |_xtext" |. .clear|
|00001d80| 69 74 28 62 6c 6f 63 6b | 21 30 2c 62 6c 6f 63 6b |it(block|!0,block|
|00001d90| 21 34 2c 62 6c 6f 63 6b | 21 31 32 29 3a e1 0d 09 |!4,block|!12):...|
|00001da0| b0 3f e7 20 62 6c 6f 63 | 6b 21 31 32 3d 74 6f 6f |.?. bloc|k!12=too|
|00001db0| 6c 62 6f 78 25 20 80 20 | 62 6c 6f 63 6b 21 31 36 |lbox% . |block!16|
|00001dc0| 3d 30 20 8c 20 f2 67 6f | 74 65 78 74 28 62 6c 6f |=0 . .go|text(blo|
|00001dd0| 63 6b 21 30 2c 62 6c 6f | 63 6b 21 34 29 0d 09 ba |ck!0,blo|ck!4)...|
|00001de0| 35 e7 20 62 6c 6f 63 6b | 21 31 32 3d 74 6f 6f 6c |5. block|!12=tool|
|00001df0| 62 6f 78 25 20 80 20 62 | 6c 6f 63 6b 21 31 36 3d |box% . b|lock!16=|
|00001e00| 31 20 f2 6f 70 65 6e 77 | 69 6e 28 74 6f 6f 6c 73 |1 .openw|in(tools|
|00001e10| 25 29 0d 09 c4 35 e7 20 | 62 6c 6f 63 6b 21 31 32 |%)...5. |block!12|
|00001e20| 3d 74 6f 6f 6c 62 6f 78 | 25 20 80 20 62 6c 6f 63 |=toolbox|% . bloc|
|00001e30| 6b 21 31 36 3d 32 20 f2 | 6f 70 65 6e 77 69 6e 28 |k!16=2 .|openwin(|
|00001e40| 6c 69 6e 65 73 25 29 0d | 09 ce 2e e7 20 62 6c 6f |lines%).|.... blo|
|00001e50| 63 6b 21 31 32 3d 74 6f | 6f 6c 62 6f 78 25 20 80 |ck!12=to|olbox% .|
|00001e60| 20 62 6c 6f 63 6b 21 31 | 36 3d 33 20 f2 63 6c 65 | block!1|6=3 .cle|
|00001e70| 61 72 61 6c 6c 0d 09 d8 | 8f e7 20 62 6c 6f 63 6b |arall...|.. block|
|00001e80| 21 31 32 3d 74 6f 6f 6c | 62 6f 78 25 20 80 20 62 |!12=tool|box% . b|
|00001e90| 6c 6f 63 6b 21 31 36 3d | 38 20 80 20 74 6f 6f 6c |lock!16=|8 . tool|
|00001ea0| 24 3c 3e 22 70 74 72 5f | 78 74 65 78 74 22 20 8c |$<>"ptr_|xtext" .|
|00001eb0| 20 56 6f 6c 64 74 6f 6f | 6c 24 3d 74 6f 6f 6c 24 | Voldtoo|l$=tool$|
|00001ec0| 3a 74 6f 6f 6c 24 3d 22 | 70 74 72 5f 78 74 65 78 |:tool$="|ptr_xtex|
|00001ed0| 74 22 3a 24 70 6f 69 6e | 74 25 3d 74 6f 6f 6c 24 |t":$poin|t%=tool$|
|00001ee0| 3a c8 99 20 22 57 69 6d | 70 5f 53 70 72 69 74 65 |:.. "Wim|p_Sprite|
|00001ef0| 4f 70 22 2c 33 36 2c 2c | 70 6f 69 6e 74 25 2c 31 |Op",36,,|point%,1|
|00001f00| 2c 30 2c 30 0d 09 e2 39 | e7 20 62 6c 6f 63 6b 21 |,0,0...9|. block!|
|00001f10| 31 32 3d 71 75 65 72 79 | 25 20 80 20 62 6c 6f 63 |12=query|% . bloc|
|00001f20| 6b 21 31 36 3d 30 20 8c | 20 f2 63 6c 6f 73 65 28 |k!16=0 .| .close(|
|00001f30| 71 75 65 72 79 25 29 3a | f2 65 6e 64 71 0d 09 ec |query%):|.endq...|
|00001f40| 0f e7 20 70 72 65 71 75 | 69 74 20 8c 0d 09 f6 61 |.. prequ|it ....a|
|00001f50| e7 20 62 6c 6f 63 6b 21 | 31 32 3d 71 75 69 74 25 |. block!|12=quit%|
|00001f60| 20 80 20 62 6c 6f 63 6b | 21 31 36 3d 30 20 8c 20 | . block|!16=0 . |
|00001f70| c8 99 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |.."Wimp_|ProcessK|
|00001f80| 65 79 22 2c 26 31 46 43 | 3a c8 99 72 65 69 6e 74 |ey",&1FC|:..reint|
|00001f90| 65 72 2c 6d 79 74 61 73 | 6b 25 3a c8 99 22 57 69 |er,mytas|k%:.."Wi|
|00001fa0| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 0d 0a 00 |mp_Close|Down"...|
|00001fb0| 3b e7 20 62 6c 6f 63 6b | 21 31 32 3d 71 75 69 74 |;. block|!12=quit|
|00001fc0| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 32 20 8c |% . bloc|k!16=2 .|
|00001fd0| 20 f2 63 6c 6f 73 65 28 | 71 75 69 74 25 29 3a 70 | .close(|quit%):p|
|00001fe0| 72 65 71 75 69 74 3d a3 | 0d 0a 0a 50 e7 20 62 6c |requit=.|...P. bl|
|00001ff0| 6f 63 6b 21 31 32 3d 71 | 75 69 74 25 20 80 20 62 |ock!12=q|uit% . b|
|00002000| 6c 6f 63 6b 21 31 36 3d | 33 20 8c 20 f2 63 6c 6f |lock!16=|3 . .clo|
|00002010| 73 65 28 71 75 69 74 25 | 29 3a f2 6f 70 65 6e 77 |se(quit%|):.openw|
|00002020| 69 6e 28 73 61 76 65 64 | 25 29 3a 70 72 65 71 75 |in(saved|%):prequ|
|00002030| 69 74 73 61 76 65 3d b9 | 0d 0a 14 27 e7 20 70 72 |itsave=.|...'. pr|
|00002040| 65 71 75 69 74 20 80 20 | ac 20 70 72 65 71 75 69 |equit . |. prequi|
|00002050| 74 73 61 76 65 20 70 72 | 65 71 75 69 74 3d a3 0d |tsave pr|equit=..|
|00002060| 0a 1e 05 cc 0d 0a 28 48 | e7 20 62 6c 6f 63 6b 21 |......(H|. block!|
|00002070| 31 32 3d 71 75 69 74 25 | 20 80 20 62 6c 6f 63 6b |12=quit%| . block|
|00002080| 21 31 36 3d 30 20 8c 20 | c8 99 72 65 69 6e 74 65 |!16=0 . |..reinte|
|00002090| 72 2c 6d 79 74 61 73 6b | 25 3a c8 99 22 57 69 6d |r,mytask|%:.."Wim|
|000020a0| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 0d 0a 32 31 |p_CloseD|own"..21|
|000020b0| e7 20 62 6c 6f 63 6b 21 | 31 32 3d 71 75 69 74 25 |. block!|12=quit%|
|000020c0| 20 80 20 62 6c 6f 63 6b | 21 31 36 3d 32 20 8c 20 | . block|!16=2 . |
|000020d0| f2 63 6c 6f 73 65 28 71 | 75 69 74 25 29 0d 0a 3c |.close(q|uit%)..<|
|000020e0| 51 e7 20 62 6c 6f 63 6b | 21 31 32 3d 71 75 69 74 |Q. block|!12=quit|
|000020f0| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 33 20 8c |% . bloc|k!16=3 .|
|00002100| 20 f2 63 6c 6f 73 65 28 | 71 75 69 74 25 29 3a f2 | .close(|quit%):.|
|00002110| 6f 70 65 6e 77 69 6e 28 | 73 61 76 65 64 25 29 3a |openwin(|saved%):|
|00002120| 73 68 75 74 64 6f 77 6e | 73 61 76 65 3d b9 0d 0a |shutdown|save=...|
|00002130| 46 05 cd 0d 0a 50 05 e1 | 0d 0a 5a 0d dd f2 70 72 |F....P..|..Z...pr|
|00002140| 6f 63 65 73 73 0d 0a 64 | 2c e7 20 21 62 6c 6f 63 |ocess..d|,. !bloc|
|00002150| 6b 3d 63 69 72 63 75 69 | 74 25 20 80 20 62 6c 6f |k=circui|t% . blo|
|00002160| 63 6b 21 32 34 3d 31 33 | 20 8c 20 f2 63 61 72 65 |ck!24=13| . .care|
|00002170| 74 0d 0a 6e 20 c8 99 22 | 57 69 6d 70 5f 50 72 6f |t..n .."|Wimp_Pro|
|00002180| 63 65 73 73 4b 65 79 22 | 2c 62 6c 6f 63 6b 21 32 |cessKey"|,block!2|
|00002190| 34 0d 0a 78 05 e1 0d 0a | 82 0b dd f2 63 61 72 65 |4..x....|....care|
|000021a0| 74 0d 0a 8c 24 c8 99 22 | 57 69 6d 70 5f 47 65 74 |t...$.."|Wimp_Get|
|000021b0| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 2c |CaretPos|ition",,|
|000021c0| 62 6c 6f 63 6b 0d 0a 96 | 19 e7 20 21 62 6c 6f 63 |block...|.. !bloc|
|000021d0| 6b 3d 63 69 72 63 75 69 | 74 25 20 8c 20 e1 0d 0a |k=circui|t% . ...|
|000021e0| a0 05 e1 0d 0a aa 0c dd | f2 73 65 6c 65 63 74 0d |........|.select.|
|000021f0| 0a b4 0b 6e 6f 77 61 79 | 3d 30 0d 0a be 2e c8 99 |...noway|=0......|
|00002200| 22 57 69 6d 70 5f 44 65 | 63 6f 64 65 4d 65 6e 75 |"Wimp_De|codeMenu|
|00002210| 22 2c 2c 6f 70 65 6e 6d | 65 6e 75 25 2c 62 6c 6f |",,openm|enu%,blo|
|00002220| 63 6b 2c 69 63 6f 6e 64 | 0d 0a c8 31 e7 20 24 69 |ck,icond|...1. $i|
|00002230| 63 6f 6e 64 3d 22 51 75 | 69 74 22 20 8c 20 f2 61 |cond="Qu|it" . .a|
|00002240| 72 65 79 6f 75 73 75 72 | 65 3a 73 68 75 74 64 6f |reyousur|e:shutdo|
|00002250| 77 6e 73 61 76 65 25 3d | b9 0d 0a d2 40 e7 20 24 |wnsave%=|....@. $|
|00002260| 69 63 6f 6e 64 3d 22 54 | 6f 6f 6c 73 22 20 80 20 |icond="T|ools" . |
|00002270| 74 6f 6f 6c 73 6f 6e 20 | 8c 20 74 6f 6f 6c 73 6f |toolson |. toolso|
|00002280| 6e 3d a3 3a f2 74 6f 6f | 6c 62 6f 78 28 2d 31 29 |n=.:.too|lbox(-1)|
|00002290| 3a 6e 6f 77 61 79 3d 2d | 31 0d 0a dc 42 e7 20 24 |:noway=-|1...B. $|
|000022a0| 69 63 6f 6e 64 3d 22 54 | 6f 6f 6c 73 22 20 80 20 |icond="T|ools" . |
|000022b0| ac 20 74 6f 6f 6c 73 6f | 6e 20 80 20 6e 6f 77 61 |. toolso|n . nowa|
|000022c0| 79 3d 30 20 8c 20 74 6f | 6f 6c 73 6f 6e 3d b9 3a |y=0 . to|olson=.:|
|000022d0| f2 74 6f 6f 6c 62 6f 78 | 28 31 29 0d 0a e6 2c e7 |.toolbox|(1)...,.|
|000022e0| 20 24 69 63 6f 6e 64 3d | 22 43 6f 6d 70 6f 6e 65 | $icond=|"Compone|
|000022f0| 6e 74 73 22 20 8c 20 f2 | 6f 70 65 6e 77 69 6e 28 |nts" . .|openwin(|
|00002300| 74 6f 6f 6c 73 25 29 0d | 0a f0 27 e7 20 24 69 63 |tools%).|..'. $ic|
|00002310| 6f 6e 64 3d 22 4c 69 6e | 65 73 22 20 8c 20 f2 6f |ond="Lin|es" . .o|
|00002320| 70 65 6e 77 69 6e 28 6c | 69 6e 65 73 25 29 0d 0a |penwin(l|ines%)..|
|00002330| fa 2b e7 20 24 69 63 6f | 6e 64 3d 22 43 69 72 63 |.+. $ico|nd="Circ|
|00002340| 75 69 74 22 20 8c 20 f2 | 6f 70 65 6e 77 69 6e 28 |uit" . .|openwin(|
|00002350| 63 69 72 63 75 69 74 25 | 29 0d 0b 04 22 c8 99 22 |circuit%|)...".."|
|00002360| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00002370| 6e 66 6f 22 2c 2c 62 6c | 6f 63 6b 0d 0b 0e 11 e7 |nfo",,bl|ock.....|
|00002380| 20 62 6c 6f 63 6b 21 38 | 3d 31 20 8c 0d 0b 18 1c | block!8|=1 .....|
|00002390| e7 20 6d 65 6e 75 6f 70 | 65 6e 3d 2d 34 34 20 8c |. menuop|en=-44 .|
|000023a0| 20 f2 63 6d 65 6e 75 73 | 0d 0b 22 22 c8 99 22 57 | .cmenus|.."".."W|
|000023b0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|000023c0| 2c 6f 70 65 6e 6d 65 6e | 75 25 0d 0b 2c 05 cc 0d |,openmen|u%..,...|
|000023d0| 0b 36 1b c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |.6..."Wi|mp_Creat|
|000023e0| 65 4d 65 6e 75 22 2c 2c | 2d 31 0d 0b 40 05 cd 0d |eMenu",,|-1..@...|
|000023f0| 0b 4a 05 e1 0d 0b 54 13 | dd f2 67 72 69 64 28 64 |.J....T.|..grid(d|
|00002400| 69 72 2c 69 63 6e 29 0d | 0b 5e 1b 6e 75 6d 62 3d |ir,icn).|.^.numb=|
|00002410| bb 24 a4 69 6e 66 6f 28 | 67 72 69 64 25 2c 69 63 |.$.info(|grid%,ic|
|00002420| 6e 29 0d 0b 68 11 e7 20 | 6e 75 6d 62 3d 33 30 20 |n)..h.. |numb=30 |
|00002430| 8c 20 e1 0d 0b 72 10 e7 | 20 6e 75 6d 62 3d 35 20 |. ...r..| numb=5 |
|00002440| 8c 20 e1 0d 0b 7c 0c c8 | 8e 20 64 69 72 20 ca 0d |. ...|..|. dir ..|
|00002450| 0b 86 24 c9 20 30 3a f4 | 20 75 70 3b 49 46 20 6e |..$. 0:.| up;IF n|
|00002460| 75 6d 62 3d 33 30 20 54 | 48 45 4e 20 45 4e 44 50 |umb=30 T|HEN ENDP|
|00002470| 52 4f 43 0d 0b 90 33 f2 | 69 6e 66 6f 28 67 72 69 |ROC...3.|info(gri|
|00002480| 64 25 2c 69 63 6e 2c c3 | 28 6e 75 6d 62 2b 31 29 |d%,icn,.|(numb+1)|
|00002490| 29 3a 67 72 69 64 79 3d | 6e 75 6d 62 2b 31 3a 61 |):gridy=|numb+1:a|
|000024a0| 6c 74 65 72 3d 31 0d 0b | 9a 25 c9 20 31 3a f4 20 |lter=1..|.%. 1:. |
|000024b0| 64 6f 77 6e 3a 49 46 20 | 6e 75 6d 62 3d 35 20 54 |down:IF |numb=5 T|
|000024c0| 48 45 4e 20 45 4e 44 50 | 52 4f 43 0d 0b a4 34 f2 |HEN ENDP|ROC...4.|
|000024d0| 69 6e 66 6f 28 67 72 69 | 64 25 2c 69 63 6e 2c c3 |info(gri|d%,icn,.|
|000024e0| 28 6e 75 6d 62 2d 31 29 | 29 3a 67 72 69 64 79 3d |(numb-1)|):gridy=|
|000024f0| 6e 75 6d 62 2d 31 3a 61 | 6c 74 65 72 3d 2d 31 0d |numb-1:a|lter=-1.|
|00002500| 0b ae 26 c9 20 32 3a f4 | 20 73 6d 61 6c 6c 3a 49 |..&. 2:.| small:I|
|00002510| 46 20 6e 75 6d 62 3d 35 | 20 54 48 45 4e 20 45 4e |F numb=5| THEN EN|
|00002520| 44 50 52 4f 43 0d 0b b8 | 34 f2 69 6e 66 6f 28 67 |DPROC...|4.info(g|
|00002530| 72 69 64 25 2c 69 63 6e | 2c c3 28 6e 75 6d 62 2d |rid%,icn|,.(numb-|
|00002540| 31 29 29 3a 67 72 69 64 | 78 3d 6e 75 6d 62 2d 31 |1)):grid|x=numb-1|
|00002550| 3a 61 6c 74 65 72 3d 2d | 31 0d 0b c2 27 c9 20 33 |:alter=-|1...'. 3|
|00002560| 3a f4 20 77 69 64 65 72 | 3a 49 46 20 6e 75 6d 62 |:. wider|:IF numb|
|00002570| 3d 33 30 20 54 48 45 4e | 20 45 4e 44 50 52 4f 43 |=30 THEN| ENDPROC|
|00002580| 0d 0b cc 33 f2 69 6e 66 | 6f 28 67 72 69 64 25 2c |...3.inf|o(grid%,|
|00002590| 69 63 6e 2c c3 28 6e 75 | 6d 62 2b 31 29 29 3a 67 |icn,.(nu|mb+1)):g|
|000025a0| 72 69 64 78 3d 6e 75 6d | 62 2b 31 3a 61 6c 74 65 |ridx=num|b+1:alte|
|000025b0| 72 3d 32 0d 0b d6 05 cb | 0d 0b e0 20 f2 61 6c 74 |r=2.....|... .alt|
|000025c0| 65 72 77 69 6e 28 67 72 | 69 64 78 2c 67 72 69 64 |erwin(gr|idx,grid|
|000025d0| 79 2c 61 6c 74 65 72 29 | 0d 0b ea 05 e1 0d 0b f4 |y,alter)|........|
|000025e0| 27 dd f2 61 6c 74 65 72 | 77 69 6e 28 6e 65 77 67 |'..alter|win(newg|
|000025f0| 72 69 64 78 2c 6e 65 77 | 67 72 69 64 79 2c 61 6c |ridx,new|gridy,al|
|00002600| 74 65 72 29 0d 0b fe 0f | e7 20 61 6c 74 65 72 3d |ter)....|. alter=|
|00002610| 32 20 8c 0d 0c 08 16 e3 | 20 49 3d 30 20 b8 20 6e |2 ......| I=0 . n|
|00002620| 65 77 67 72 69 64 79 2d | 31 0d 0c 12 1a 70 73 65 |ewgridy-|1....pse|
|00002630| 74 24 28 6e 65 77 67 72 | 69 64 78 2d 31 2c 49 29 |t$(newgr|idx-1,I)|
|00002640| 3d 22 22 0d 0c 1c 05 ed | 0d 0c 26 05 cd 0d 0c 30 |="".....|..&....0|
|00002650| 0f e7 20 61 6c 74 65 72 | 3d 31 20 8c 0d 0c 3a 16 |.. alter|=1 ...:.|
|00002660| e3 20 49 3d 30 20 b8 20 | 6e 65 77 67 72 69 64 78 |. I=0 . |newgridx|
|00002670| 2b 31 0d 0c 44 1a 70 73 | 65 74 24 28 49 2c 6e 65 |+1..D.ps|et$(I,ne|
|00002680| 77 67 72 69 64 79 2d 31 | 29 3d 22 22 0d 0c 4e 05 |wgridy-1|)=""..N.|
|00002690| ed 0d 0c 58 05 cd 0d 0c | 62 46 62 6c 6f 63 6b 21 |...X....|bFblock!|
|000026a0| 36 34 3d 30 3a 62 6c 6f | 63 6b 21 36 38 3d 2d 28 |64=0:blo|ck!68=-(|
|000026b0| 6e 65 77 67 72 69 64 79 | 2a 36 32 29 3a 62 6c 6f |newgridy|*62):blo|
|000026c0| 63 6b 21 37 32 3d 6e 65 | 77 67 72 69 64 78 2a 36 |ck!72=ne|wgridx*6|
|000026d0| 32 3a 62 6c 6f 63 6b 21 | 37 36 3d 30 0d 0c 6c 29 |2:block!|76=0..l)|
|000026e0| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 45 78 74 65 |.. "Wimp|_SetExte|
|000026f0| 6e 74 22 2c 63 69 72 63 | 75 69 74 25 2c 62 6c 6f |nt",circ|uit%,blo|
|00002700| 63 6b 2b 36 34 0d 0c 76 | 13 21 62 6c 6f 63 6b 3d |ck+64..v|.!block=|
|00002710| 63 69 72 63 75 69 74 25 | 0d 0c 80 22 c8 99 22 57 |circuit%|...".."W|
|00002720| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00002730| 74 65 22 2c 2c 62 6c 6f | 63 6b 0d 0c 8a 1b 6f 70 |te",,blo|ck....op|
|00002740| 65 6e 3d 62 6c 6f 63 6b | 21 33 32 20 80 20 28 31 |en=block|!32 . (1|
|00002750| 3c 3c 31 36 29 0d 0c 94 | 0f e7 20 6f 70 65 6e 3c |<<16)...|.. open<|
|00002760| 3e 30 20 8c 0d 0c 9e 1e | c8 99 22 57 69 6d 70 5f |>0 .....|.."Wimp_|
|00002770| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|00002780| 63 6b 0d 0c a8 40 c8 99 | 22 57 69 6d 70 5f 46 6f |ck...@..|"Wimp_Fo|
|00002790| 72 63 65 52 65 64 72 61 | 77 22 2c 63 69 72 63 75 |rceRedra|w",circu|
|000027a0| 69 74 25 2c 30 2c 2d 28 | 6e 65 77 67 72 69 64 79 |it%,0,-(|newgridy|
|000027b0| 2a 36 32 29 2c 6e 65 77 | 67 72 69 64 78 2a 36 32 |*62),new|gridx*62|
|000027c0| 2c 30 0d 0c b2 05 cd 0d | 0c bc 05 e1 0d 0c c6 11 |,0......|........|
|000027d0| dd f2 6d 65 73 73 28 6d | 65 73 73 24 29 0d 0c d0 |..mess(m|ess$)...|
|000027e0| 20 21 69 63 6f 6e 64 3d | 30 3a 24 28 69 63 6f 6e | !icond=|0:$(icon|
|000027f0| 64 2b 34 29 3d 6d 65 73 | 73 24 2b bd 30 0d 0c da |d+4)=mes|s$+.0...|
|00002800| 2b c8 99 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 |+.."Wimp|_ReportE|
|00002810| 72 72 6f 72 22 2c 69 63 | 6f 6e 64 2c 31 2c 22 21 |rror",ic|ond,1,"!|
|00002820| 43 69 72 63 75 69 74 22 | 0d 0c e4 05 e1 0d 0c ee |Circuit"|........|
|00002830| 09 dd f2 6f 75 74 0d 0c | f8 0f f2 64 72 61 67 73 |...out..|...drags|
|00002840| 70 72 28 31 29 0d 0d 02 | 29 e7 20 77 69 6e 73 61 |pr(1)...|). winsa|
|00002850| 76 65 25 3d 73 61 76 65 | 25 20 8c 20 73 74 65 78 |ve%=save|% . stex|
|00002860| 74 3d 73 74 65 78 3a 66 | 74 3d 26 41 46 46 0d 0d |t=stex:f|t=&AFF..|
|00002870| 0c 2b e7 20 77 69 6e 73 | 61 76 65 25 3d 73 61 76 |.+. wins|ave%=sav|
|00002880| 65 64 25 20 8c 20 73 74 | 65 78 74 3d 73 74 65 78 |ed% . st|ext=stex|
|00002890| 64 3a 66 74 3d 26 30 30 | 43 0d 0d 16 10 e7 20 64 |d:ft=&00|C..... d|
|000028a0| 72 69 76 65 25 3d 31 20 | 8c 0d 0d 20 23 c8 99 20 |rive%=1 |... #.. |
|000028b0| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|000028c0| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 0d 0d 2a 39 |Info",,b|lock..*9|
|000028d0| 54 6f 58 3d 62 6c 6f 63 | 6b 21 30 3a 54 6f 59 3d |ToX=bloc|k!0:ToY=|
|000028e0| 62 6c 6f 63 6b 21 34 3a | 57 69 6e 64 6f 77 3d 62 |block!4:|Window=b|
|000028f0| 6c 6f 63 6b 21 31 32 3a | 49 63 6f 6e 3d 62 6c 6f |lock!12:|Icon=blo|
|00002900| 63 6b 21 31 36 0d 0d 34 | 33 6d 62 6c 6f 63 6b 21 |ck!16..4|3mblock!|
|00002910| 30 3d 32 35 36 3a 6d 62 | 6c 6f 63 6b 21 31 32 3d |0=256:mb|lock!12=|
|00002920| 30 3a 6d 62 6c 6f 63 6b | 21 31 36 3d 31 3a f4 20 |0:mblock|!16=1:. |
|00002930| 44 61 74 61 53 61 76 65 | 0d 0d 3e 3f 6d 62 6c 6f |DataSave|..>?mblo|
|00002940| 63 6b 21 32 30 3d 57 69 | 6e 64 6f 77 3a 6d 62 6c |ck!20=Wi|ndow:mbl|
|00002950| 6f 63 6b 21 32 34 3d 49 | 63 6f 6e 3a 6d 62 6c 6f |ock!24=I|con:mblo|
|00002960| 63 6b 21 32 38 3d 54 6f | 58 3a 6d 62 6c 6f 63 6b |ck!28=To|X:mblock|
|00002970| 21 33 32 3d 54 6f 59 0d | 0d 48 37 6d 62 6c 6f 63 |!32=ToY.|.H7mbloc|
|00002980| 6b 21 33 36 3d 2d 31 3a | f4 20 4e 6f 20 69 64 65 |k!36=-1:|. No ide|
|00002990| 61 20 77 68 61 74 20 74 | 68 65 20 73 69 7a 65 20 |a what t|he size |
|000029a0| 69 73 20 67 6f 69 6e 67 | 20 74 6f 20 62 65 0d 0d |is going| to be..|
|000029b0| 52 11 6d 62 6c 6f 63 6b | 21 34 30 3d 66 74 3a 0d |R.mblock|!40=ft:.|
|000029c0| 0d 5c 1d 24 73 74 65 78 | 74 3d 24 a4 69 6e 66 6f |.\.$stex|t=$.info|
|000029d0| 28 77 69 6e 73 61 76 65 | 25 2c 31 29 0d 0d 66 1b |(winsave|%,1)..f.|
|000029e0| 24 73 74 65 78 74 3d a4 | 67 65 74 6c 65 61 66 28 |$stext=.|getleaf(|
|000029f0| 24 73 74 65 78 74 29 0d | 0d 70 29 e3 20 49 3d 30 |$stext).|.p). I=0|
|00002a00| 20 b8 20 32 35 35 3a e7 | 20 49 3f 73 74 65 78 74 | . 255:.| I?stext|
|00002a10| 3c 33 32 20 8c 20 49 3f | 73 74 65 78 74 3d 31 33 |<32 . I?|stext=13|
|00002a20| 0d 0d 7a 05 ed 0d 0d 84 | 20 24 28 6d 62 6c 6f 63 |..z.....| $(mbloc|
|00002a30| 6b 2b 34 34 29 3d a4 62 | 69 74 28 24 73 74 65 78 |k+44)=.b|it($stex|
|00002a40| 74 29 2b bd 30 0d 0d 8e | 3a c8 99 20 22 57 69 6d |t)+.0...|:.. "Wim|
|00002a50| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00002a60| 37 2c 6d 62 6c 6f 63 6b | 2c 57 69 6e 64 6f 77 2c |7,mblock|,Window,|
|00002a70| 49 63 6f 6e 3a f4 20 44 | 61 74 61 53 61 76 65 0d |Icon:. D|ataSave.|
|00002a80| 0d 98 0b 64 72 61 67 25 | 3d 30 0d 0d a2 05 cd 0d |...drag%|=0......|
|00002a90| 0d ac 05 e1 0d 0d b6 14 | dd a4 67 65 74 6c 65 61 |........|..getlea|
|00002aa0| 66 28 6c 65 61 66 24 29 | 0d 0d c0 12 c8 95 20 a7 |f(leaf$)|...... .|
|00002ab0| 6c 65 61 66 24 2c 22 2e | 22 29 0d 0d ca 1f 6c 65 |leaf$,".|")....le|
|00002ac0| 61 66 24 3d c1 6c 65 61 | 66 24 2c a7 6c 65 61 66 |af$=.lea|f$,.leaf|
|00002ad0| 24 2c 22 2e 22 29 2b 31 | 29 0d 0d d4 0c ce 3a 3d |$,".")+1|).....:=|
|00002ae0| 6c 65 61 66 24 0d 0d de | 0d dd f2 64 65 66 73 61 |leaf$...|...defsa|
|00002af0| 76 65 0d 0d e8 09 f2 4d | 6f 64 65 0d 0d f2 13 21 |ve.....M|ode....!|
|00002b00| 62 6c 6f 63 6b 3d 77 69 | 6e 73 61 76 65 25 0d 0d |block=wi|nsave%..|
|00002b10| fc 23 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |.#.. "Wi|mp_GetWi|
|00002b20| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |ndowStat|e",,bloc|
|00002b30| 6b 0d 0e 06 1b 79 73 69 | 7a 65 25 3d 62 6c 6f 63 |k....ysi|ze%=bloc|
|00002b40| 6b 21 31 36 2d 62 6c 6f | 63 6b 21 38 0d 0e 10 23 |k!16-blo|ck!8...#|
|00002b50| 78 25 3d 62 6c 6f 63 6b | 21 34 3a 79 25 3d 62 6c |x%=block|!4:y%=bl|
|00002b60| 6f 63 6b 21 38 3a 62 6c | 6f 63 6b 21 34 3d 32 0d |ock!8:bl|ock!4=2.|
|00002b70| 0e 1a 20 c8 99 22 57 69 | 6d 70 5f 47 65 74 49 63 |.. .."Wi|mp_GetIc|
|00002b80| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 0d |onState"|,,block.|
|00002b90| 0e 24 23 62 6c 6f 63 6b | 21 38 2b 3d 78 25 3a 62 |.$#block|!8+=x%:b|
|00002ba0| 6c 6f 63 6b 21 31 32 2b | 3d 79 25 2b 79 73 69 7a |lock!12+|=y%+ysiz|
|00002bb0| 65 25 0d 0e 2e 24 62 6c | 6f 63 6b 21 31 36 2b 3d |e%...$bl|ock!16+=|
|00002bc0| 78 25 3a 62 6c 6f 63 6b | 21 32 30 2b 3d 79 25 2b |x%:block|!20+=y%+|
|00002bd0| 79 73 69 7a 65 25 0d 0e | 38 35 62 6c 6f 63 6b 21 |ysize%..|85block!|
|00002be0| 32 34 3d 30 3a 62 6c 6f | 63 6b 21 32 38 3d 30 3a |24=0:blo|ck!28=0:|
|00002bf0| 62 6c 6f 63 6b 21 33 32 | 3d 78 6d 61 78 3a 62 6c |block!32|=xmax:bl|
|00002c00| 6f 63 6b 21 33 36 3d 79 | 6d 61 78 0d 0e 42 27 21 |ock!36=y|max..B'!|
|00002c10| 62 6c 6f 63 6b 3d 30 3a | 62 6c 6f 63 6b 21 34 3d |block=0:|block!4=|
|00002c20| 35 3a 64 72 61 67 25 3d | b9 3a 64 72 69 76 65 25 |5:drag%=|.:drive%|
|00002c30| 3d 31 0d 0e 4c 0f e7 20 | 64 72 61 67 73 70 72 20 |=1..L.. |dragspr |
|00002c40| 8c 0d 0e 56 38 c8 99 20 | 22 44 72 61 67 41 53 70 |...V8.. |"DragASp|
|00002c50| 72 69 74 65 5f 53 74 61 | 72 74 22 2c 25 31 30 30 |rite_Sta|rt",%100|
|00002c60| 30 30 31 30 31 2c 31 2c | 66 69 6c 65 74 79 70 65 |00101,1,|filetype|
|00002c70| 24 2c 62 6c 6f 63 6b 2b | 38 0d 0e 60 10 f2 64 72 |$,block+|8..`..dr|
|00002c80| 61 67 73 70 72 28 2d 31 | 29 0d 0e 6a 05 cc 0d 0e |agspr(-1|)..j....|
|00002c90| 74 1b c8 99 22 57 69 6d | 70 5f 44 72 61 67 42 6f |t..."Wim|p_DragBo|
|00002ca0| 78 22 2c 2c 62 6c 6f 63 | 6b 0d 0e 7e 05 cd 0d 0e |x",,bloc|k..~....|
|00002cb0| 88 05 e1 0d 0e 92 0a dd | f2 4d 6f 64 65 0d 0e 9c |........|.Mode...|
|00002cc0| 4d 21 62 6c 6f 63 6b 3d | 31 33 30 3a 62 6c 6f 63 |M!block=|130:bloc|
|00002cd0| 6b 21 34 3d 31 33 31 3a | 62 6c 6f 63 6b 21 38 3d |k!4=131:|block!8=|
|00002ce0| 2d 31 3a c8 99 22 4f 53 | 5f 52 65 61 64 56 64 75 |-1:.."OS|_ReadVdu|
|00002cf0| 56 61 72 69 61 62 6c 65 | 73 22 2c 62 6c 6f 63 6b |Variable|s",block|
|00002d00| 2c 62 6c 6f 63 6b 2b 31 | 32 38 0d 0e a6 29 c8 99 |,block+1|28...)..|
|00002d10| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|00002d20| 61 62 6c 65 22 2c eb 2c | 34 20 b8 20 2c 2c 58 65 |able",.,|4 . ,,Xe|
|00002d30| 69 67 25 0d 0e b0 29 c8 | 99 22 4f 53 5f 52 65 61 |ig%...).|."OS_Rea|
|00002d40| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c eb |dModeVar|iable",.|
|00002d50| 2c 35 20 b8 20 2c 2c 59 | 65 69 67 25 0d 0e ba 3d |,5 . ,,Y|eig%...=|
|00002d60| 78 6d 61 78 3d 28 28 62 | 6c 6f 63 6b 21 31 32 38 |xmax=((b|lock!128|
|00002d70| 29 2b 31 29 2a 32 5e 58 | 65 69 67 25 3a 79 6d 61 |)+1)*2^X|eig%:yma|
|00002d80| 78 3d 28 28 62 6c 6f 63 | 6b 21 31 33 32 29 2b 31 |x=((bloc|k!132)+1|
|00002d90| 29 2a 32 5e 59 65 69 67 | 25 0d 0e c4 05 e1 0d 0e |)*2^Yeig|%.......|
|00002da0| ce 11 dd f2 73 61 76 65 | 28 73 61 76 65 24 29 0d |....save|(save$).|
|00002db0| 0e d8 7a e7 20 a7 73 61 | 76 65 24 2c 22 2e 22 29 |..z. .sa|ve$,".")|
|00002dc0| 3c 31 20 80 20 a7 73 61 | 76 65 24 2c 22 3a 22 29 |<1 . .sa|ve$,":")|
|00002dd0| 3c 31 20 80 20 73 61 76 | 65 24 3c 3e 22 3c 57 69 |<1 . sav|e$<>"<Wi|
|00002de0| 6d 70 24 53 63 72 61 70 | 3e 22 20 8c 20 f2 6d 65 |mp$Scrap|>" . .me|
|00002df0| 73 73 28 22 54 6f 20 73 | 61 76 65 2c 20 64 72 61 |ss("To s|ave, dra|
|00002e00| 67 20 74 68 65 20 73 61 | 76 65 20 69 63 6f 6e 20 |g the sa|ve icon |
|00002e10| 74 6f 20 61 20 64 69 72 | 65 63 74 6f 72 79 20 76 |to a dir|ectory v|
|00002e20| 69 65 77 65 72 22 29 3a | e1 0d 0e e2 17 e7 20 77 |iewer"):|...... w|
|00002e30| 69 6e 73 61 76 65 25 3d | 73 61 76 65 64 25 20 8c |insave%=|saved% .|
|00002e40| 0d 0e ec 12 66 69 6c 65 | 25 3d ae 28 73 61 76 65 |....file|%=.(save|
|00002e50| 24 29 0d 0e f6 1f f1 23 | 66 69 6c 65 25 2c 22 43 |$).....#|file%,"C|
|00002e60| 69 72 63 75 69 74 20 44 | 61 74 61 20 46 69 6c 65 |ircuit D|ata File|
|00002e70| 22 0d 0f 00 17 f1 23 66 | 69 6c 65 25 2c 67 72 69 |".....#f|ile%,gri|
|00002e80| 64 78 2c 67 72 69 64 79 | 0d 0f 0a 11 e3 20 41 3d |dx,gridy|..... A=|
|00002e90| 30 20 b8 20 67 72 69 64 | 78 0d 0f 14 11 e3 20 42 |0 . grid|x..... B|
|00002ea0| 3d 30 20 b8 20 67 72 69 | 64 79 0d 0f 1e 16 f1 23 |=0 . gri|dy.....#|
|00002eb0| 66 69 6c 65 25 2c 70 73 | 65 74 24 28 41 2c 42 29 |file%,ps|et$(A,B)|
|00002ec0| 0d 0f 28 07 ed 20 42 0d | 0f 32 07 ed 20 41 0d 0f |..(.. B.|.2.. A..|
|00002ed0| 3c 0e e7 20 74 6f 74 3e | 2d 31 20 8c 0d 0f 46 22 |<.. tot>|-1 ...F"|
|00002ee0| f1 23 66 69 6c 65 25 2c | 31 2c 22 54 65 78 74 20 |.#file%,|1,"Text |
|00002ef0| 44 65 74 61 69 6c 73 3a | 2d 22 2c 74 6f 74 0d 0f |Details:|-",tot..|
|00002f00| 50 0f e3 20 49 3d 30 20 | b8 20 74 6f 74 0d 0f 5a |P.. I=0 |. tot..Z|
|00002f10| 18 f1 23 66 69 6c 65 25 | 2c 74 65 78 74 69 6e 66 |..#file%|,textinf|
|00002f20| 6f 24 28 49 29 0d 0f 64 | 05 ed 0d 0f 6e 10 cc 20 |o$(I)..d|....n.. |
|00002f30| f1 23 66 69 6c 65 25 2c | 2d 31 0d 0f 78 05 cd 0d |.#file%,|-1..x...|
|00002f40| 0f 82 0b d9 23 66 69 6c | 65 25 0d 0f 8c 1f ff 28 |....#fil|e%.....(|
|00002f50| 22 53 65 74 74 79 70 65 | 20 22 2b 73 61 76 65 24 |"Settype| "+save$|
|00002f60| 2b 22 20 26 30 30 43 22 | 29 0d 0f 96 0e c8 8e 20 |+" &00C"|)...... |
|00002f70| 73 61 76 65 24 20 ca 0d | 0f a0 14 c9 20 22 3c 57 |save$ ..|.... "<W|
|00002f80| 69 6d 70 24 53 63 72 61 | 70 3e 22 0d 0f aa 05 7f |imp$Scra|p>".....|
|00002f90| 0d 0f b4 13 21 62 6c 6f | 63 6b 3d 63 69 72 63 75 |....!blo|ck=circu|
|00002fa0| 69 74 25 0d 0f be 21 c8 | 99 22 57 69 6d 70 5f 47 |it%...!.|."Wimp_G|
|00002fb0| 65 74 57 69 6e 64 6f 77 | 49 6e 66 6f 22 2c 2c 62 |etWindow|Info",,b|
|00002fc0| 6c 6f 63 6b 0d 0f c8 0b | 73 61 76 65 64 3d a3 0d |lock....|saved=..|
|00002fd0| 0f d2 20 5f 70 25 20 3d | 20 21 28 62 6c 6f 63 6b |.. _p% =| !(block|
|00002fe0| 2b 37 36 29 3a 24 5f 70 | 25 3d 73 61 76 65 24 0d |+76):$_p|%=save$.|
|00002ff0| 0f dc 46 c8 99 22 57 69 | 6d 70 5f 46 6f 72 63 65 |..F.."Wi|mp_Force|
|00003000| 52 65 64 72 61 77 22 2c | 2d 31 2c 62 6c 6f 63 6b |Redraw",|-1,block|
|00003010| 21 34 2c 28 62 6c 6f 63 | 6b 21 31 36 29 2d 33 32 |!4,(bloc|k!16)-32|
|00003020| 2c 62 6c 6f 63 6b 21 31 | 32 2c 62 6c 6f 63 6b 21 |,block!1|2,block!|
|00003030| 31 36 2b 33 36 0d 0f e6 | 05 cb 0d 0f f0 39 e7 20 |16+36...|.....9. |
|00003040| 73 68 75 74 64 6f 77 6e | 73 61 76 65 20 c8 99 72 |shutdown|save ..r|
|00003050| 65 69 6e 74 65 72 2c 6d | 79 74 61 73 6b 25 3a c8 |einter,m|ytask%:.|
|00003060| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e |."Wimp_C|loseDown|
|00003070| 22 3a e0 0d 0f fa 05 cd | 0d 10 04 16 e7 20 77 69 |":......|..... wi|
|00003080| 6e 73 61 76 65 25 3d 73 | 61 76 65 25 20 8c 0d 10 |nsave%=s|ave% ...|
|00003090| 0e 0d f2 73 61 76 65 64 | 72 61 77 0d 10 18 05 cd |...saved|raw.....|
|000030a0| 0d 10 22 35 e7 20 73 61 | 76 65 24 3c 3e 22 3c 57 |.."5. sa|ve$<>"<W|
|000030b0| 69 6d 70 24 53 63 72 61 | 70 3e 22 20 8c 20 f2 69 |imp$Scra|p>" . .i|
|000030c0| 6e 66 6f 28 77 69 6e 73 | 61 76 65 25 2c 31 2c 73 |nfo(wins|ave%,1,s|
|000030d0| 61 76 65 24 29 0d 10 2c | 05 e1 0d 10 36 0f dd f2 |ave$)..,|....6...|
|000030e0| 6d 65 73 73 61 67 65 69 | 6e 0d 10 40 10 73 65 6e |messagei|n..@.sen|
|000030f0| 64 6d 3d 26 34 30 30 45 | 37 0d 10 4a 1c 72 65 66 |dm=&400E|7..J.ref|
|00003100| 3d 62 6c 6f 63 6b 21 38 | 3a 74 61 73 6b 3d 62 6c |=block!8|:task=bl|
|00003110| 6f 63 6b 21 34 0d 10 54 | 11 c8 8e 20 62 6c 6f 63 |ock!4..T|... bloc|
|00003120| 6b 21 31 36 20 ca 0d 10 | 5e 2e c9 20 30 3a c8 99 |k!16 ...|^.. 0:..|
|00003130| 72 65 69 6e 74 65 72 2c | 6d 79 74 61 73 6b 25 3a |reinter,|mytask%:|
|00003140| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |.."Wimp_|CloseDow|
|00003150| 6e 22 3a e0 0d 10 68 08 | c9 20 32 3a 0d 10 72 19 |n":...h.|. 2:..r.|
|00003160| 73 61 76 65 24 3d a4 77 | 6f 6f 6c 28 62 6c 6f 63 |save$=.w|ool(bloc|
|00003170| 6b 2b 34 34 29 0d 10 7c | 0f f2 64 72 61 67 73 70 |k+44)..||..dragsp|
|00003180| 72 28 31 29 0d 10 86 10 | e7 20 64 72 69 76 65 25 |r(1)....|. drive%|
|00003190| 3d 31 20 8c 0d 10 90 10 | f2 73 61 76 65 28 73 61 |=1 .....|.save(sa|
|000031a0| 76 65 24 29 0d 10 9a 10 | 6d 62 6c 6f 63 6b 21 30 |ve$)....|mblock!0|
|000031b0| 3d 32 35 36 0d 10 a4 11 | 6d 62 6c 6f 63 6b 21 31 |=256....|mblock!1|
|000031c0| 32 3d 72 65 66 0d 10 ae | 0f 6d 62 6c 6f 63 6b 21 |2=ref...|.mblock!|
|000031d0| 31 36 3d 33 0d 10 b8 10 | 6d 62 6c 6f 63 6b 21 33 |16=3....|mblock!3|
|000031e0| 36 3d 2d 31 0d 10 c2 16 | 24 28 6d 62 6c 6f 63 6b |6=-1....|$(mblock|
|000031f0| 2b 34 34 29 3d 73 61 76 | 65 24 0d 10 cc 27 c8 99 |+44)=sav|e$...'..|
|00003200| 20 26 34 30 30 45 37 2c | 31 38 2c 6d 62 6c 6f 63 | &400E7,|18,mbloc|
|00003210| 6b 2c 74 61 73 6b 3a f4 | 20 44 61 74 61 4c 6f 61 |k,task:.| DataLoa|
|00003220| 64 0d 10 d6 05 cd 0d 10 | e0 08 c9 20 33 3a 0d 10 |d.......|... 3:..|
|00003230| ea 47 e7 20 62 6c 6f 63 | 6b 21 34 30 3c 3e 26 30 |.G. bloc|k!40<>&0|
|00003240| 30 43 20 8c 20 f2 6d 65 | 73 73 28 22 4f 6e 6c 79 |0C . .me|ss("Only|
|00003250| 20 43 69 72 63 75 69 74 | 20 44 61 74 61 20 66 69 | Circuit| Data fi|
|00003260| 6c 65 73 20 63 61 6e 20 | 62 65 20 6c 6f 61 64 65 |les can |be loade|
|00003270| 64 22 29 3a e1 0d 10 f4 | 26 6c 6f 61 64 24 3d a4 |d"):....|&load$=.|
|00003280| 77 6f 6f 6c 28 62 6c 6f | 63 6b 2b 34 34 29 3a f2 |wool(blo|ck+44):.|
|00003290| 6c 6f 61 64 28 6c 6f 61 | 64 24 29 0d 10 fe 08 c9 |load(loa|d$).....|
|000032a0| 20 35 3a 0d 11 08 15 e7 | 20 62 6c 6f 63 6b 21 34 | 5:.....| block!4|
|000032b0| 30 3d 26 30 30 43 20 8c | 0d 11 12 1f 62 6c 6f 63 |0=&00C .|....bloc|
|000032c0| 6b 21 31 32 3d 62 6c 6f | 63 6b 21 38 3a 62 6c 6f |k!12=blo|ck!8:blo|
|000032d0| 63 6b 21 31 36 3d 34 0d | 11 1c 2b c8 99 20 73 65 |ck!16=4.|..+.. se|
|000032e0| 6e 64 6d 2c 31 38 2c 62 | 6c 6f 63 6b 2c 62 6c 6f |ndm,18,b|lock,blo|
|000032f0| 63 6b 21 34 3a f4 20 44 | 61 74 61 4c 6f 61 64 41 |ck!4:. D|ataLoadA|
|00003300| 63 6b 0d 11 26 1a f2 6c | 6f 61 64 28 a4 77 6f 6f |ck..&..l|oad(.woo|
|00003310| 6c 28 62 6c 6f 63 6b 2b | 34 34 29 29 0d 11 30 05 |l(block+|44))..0.|
|00003320| cd 0d 11 3a 6e c9 20 38 | 3a e7 20 70 72 65 71 75 |...:n. 8|:. prequ|
|00003330| 69 74 20 c8 99 72 65 69 | 6e 74 65 72 2c 6d 79 74 |it ..rei|nter,myt|
|00003340| 61 73 6b 25 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |ask%:.."|Wimp_Clo|
|00003350| 73 65 44 6f 77 6e 22 3a | e0 3a 8b 3a 62 6c 6f 63 |seDown":|.:.:bloc|
|00003360| 6b 21 31 32 3d 72 65 66 | 3a c8 99 73 65 6e 64 6d |k!12=ref|:..sendm|
|00003370| 2c 31 39 2c 62 6c 6f 63 | 6b 3a 70 72 65 71 75 69 |,19,bloc|k:prequi|
|00003380| 74 3d b9 3a f2 61 72 65 | 79 6f 75 73 75 72 65 0d |t=.:.are|yousure.|
|00003390| 11 44 05 cb 0d 11 4e 05 | e1 0d 11 58 11 dd f2 6c |.D....N.|...X...l|
|000033a0| 6f 61 64 28 6c 6f 61 64 | 24 29 0d 11 62 08 69 6e |oad(load|$)..b.in|
|000033b0| 3d b9 0d 11 6c 0e 66 6f | 6e 74 6d 65 73 73 3d a3 |=...l.fo|ntmess=.|
|000033c0| 0d 11 76 12 6c 6f 61 64 | 25 3d 8e 28 6c 6f 61 64 |..v.load|%=.(load|
|000033d0| 24 29 0d 11 80 12 e8 23 | 6c 6f 61 64 25 2c 74 69 |$).....#|load%,ti|
|000033e0| 74 6c 65 24 0d 11 8a 5d | e7 20 74 69 74 6c 65 24 |tle$...]|. title$|
|000033f0| 3c 3e 22 43 69 72 63 75 | 69 74 20 44 61 74 61 20 |<>"Circu|it Data |
|00003400| 46 69 6c 65 22 20 8c 20 | f2 71 75 65 72 79 28 22 |File" . |.query("|
|00003410| 54 68 69 73 20 69 73 20 | 6e 6f 74 20 61 20 74 72 |This is |not a tr|
|00003420| 75 65 20 43 69 72 63 75 | 69 74 20 44 61 74 61 20 |ue Circu|it Data |
|00003430| 66 69 6c 65 21 22 29 3a | d9 23 6c 6f 61 64 25 3a |file!"):|.#load%:|
|00003440| e1 0d 11 94 17 e8 23 6c | 6f 61 64 25 2c 67 72 69 |......#l|oad%,gri|
|00003450| 64 78 2c 67 72 69 64 79 | 0d 11 9e 0a 74 6f 74 3d |dx,gridy|....tot=|
|00003460| 2d 31 0d 11 a8 11 e3 20 | 41 3d 30 20 b8 20 67 72 |-1..... |A=0 . gr|
|00003470| 69 64 78 0d 11 b2 11 e3 | 20 42 3d 30 20 b8 20 67 |idx.....| B=0 . g|
|00003480| 72 69 64 79 0d 11 bc 0e | e8 23 6c 6f 61 64 25 2c |ridy....|.#load%,|
|00003490| 61 24 0d 11 c6 11 70 73 | 65 74 24 28 41 2c 42 29 |a$....ps|et$(A,B)|
|000034a0| 3d 61 24 0d 11 d0 07 ed | 20 42 0d 11 da 07 ed 20 |=a$.....| B..... |
|000034b0| 41 0d 11 e4 10 e8 23 6c | 6f 61 64 25 2c 74 65 78 |A.....#l|oad%,tex|
|000034c0| 74 0d 11 ee 0e e7 20 74 | 65 78 74 3d 31 20 8c 0d |t..... t|ext=1 ..|
|000034d0| 11 f8 17 e8 23 6c 6f 61 | 64 25 2c 74 68 69 6e 67 |....#loa|d%,thing|
|000034e0| 24 2c 6e 6f 6f 66 0d 12 | 02 10 e3 20 46 3d 30 20 |$,noof..|... F=0 |
|000034f0| b8 20 6e 6f 6f 66 0d 12 | 0c 0a 74 6f 74 2b 3d 31 |. noof..|..tot+=1|
|00003500| 0d 12 16 11 e8 23 6c 6f | 61 64 25 2c 74 65 78 74 |.....#lo|ad%,text|
|00003510| 24 0d 12 20 18 74 65 78 | 74 69 6e 66 6f 24 28 74 |$.. .tex|tinfo$(t|
|00003520| 6f 74 29 3d 74 65 78 74 | 24 0d 12 2a 07 ed 20 46 |ot)=text|$..*.. F|
|00003530| 0d 12 34 05 cd 0d 12 3e | 0a 74 65 78 74 3d a3 0d |..4....>|.text=..|
|00003540| 12 48 0b d9 23 6c 6f 61 | 64 25 0d 12 52 13 21 69 |.H..#loa|d%..R.!i|
|00003550| 63 6f 6e 64 3d 63 69 72 | 63 75 69 74 25 0d 12 5c |cond=cir|cuit%..\|
|00003560| 21 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |!.."Wimp|_GetWind|
|00003570| 6f 77 49 6e 66 6f 22 2c | 2c 69 63 6f 6e 64 0d 12 |owInfo",|,icond..|
|00003580| 66 66 73 61 76 65 64 3d | a3 3a 5f 70 25 20 3d 20 |ffsaved=|.:_p% = |
|00003590| 21 28 69 63 6f 6e 64 2b | 37 36 29 3a 24 5f 70 25 |!(icond+|76):$_p%|
|000035a0| 3d 6c 6f 61 64 24 3a c8 | 99 22 57 69 6d 70 5f 46 |=load$:.|."Wimp_F|
|000035b0| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 2d 31 2c 69 |orceRedr|aw",-1,i|
|000035c0| 63 6f 6e 64 21 34 2c 69 | 63 6f 6e 64 21 31 36 2c |cond!4,i|cond!16,|
|000035d0| 69 63 6f 6e 64 21 31 32 | 2c 69 63 6f 6e 64 21 31 |icond!12|,icond!1|
|000035e0| 36 2b 33 36 0d 12 70 1a | 24 a4 69 6e 66 6f 28 73 |6+36..p.|$.info(s|
|000035f0| 61 76 65 64 25 2c 31 29 | 3d 6c 6f 61 64 24 0d 12 |aved%,1)|=load$..|
|00003600| 7a 1c f2 61 6c 74 65 72 | 77 69 6e 28 67 72 69 64 |z..alter|win(grid|
|00003610| 78 2c 67 72 69 64 79 2c | 30 29 0d 12 84 2f f2 69 |x,gridy,|0).../.i|
|00003620| 6e 66 6f 28 67 72 69 64 | 25 2c 38 2c c3 67 72 69 |nfo(grid|%,8,.gri|
|00003630| 64 79 29 3a f2 69 6e 66 | 6f 28 67 72 69 64 25 2c |dy):.inf|o(grid%,|
|00003640| 35 2c c3 67 72 69 64 78 | 29 0d 12 8e 29 f2 6f 70 |5,.gridx|)...).op|
|00003650| 65 6e 77 69 6e 28 63 69 | 72 63 75 69 74 25 29 3a |enwin(ci|rcuit%):|
|00003660| f2 6f 70 65 6e 77 69 6e | 28 74 6f 6f 6c 62 6f 78 |.openwin|(toolbox|
|00003670| 25 29 0d 12 98 05 cd 0d | 12 a2 05 e1 0d 12 ac 16 |%)......|........|
|00003680| dd f2 6f 70 65 6e 77 69 | 6e 28 68 61 6e 64 6c 65 |..openwi|n(handle|
|00003690| 25 29 0d 12 b6 12 21 62 | 6c 6f 63 6b 3d 68 61 6e |%)....!b|lock=han|
|000036a0| 64 6c 65 25 0d 12 c0 21 | c8 99 22 57 69 6d 70 5f |dle%...!|.."Wimp_|
|000036b0| 47 65 74 57 69 6e 64 6f | 77 49 6e 66 6f 22 2c 2c |GetWindo|wInfo",,|
|000036c0| 62 6c 6f 63 6b 0d 12 ca | 18 61 3d 62 6c 6f 63 6b |block...|.a=block|
|000036d0| 21 33 32 20 80 20 28 31 | 3c 3c 31 36 29 0d 12 d4 |!32 . (1|<<16)...|
|000036e0| 18 62 3d 62 6c 6f 63 6b | 21 33 32 20 80 20 28 31 |.b=block|!32 . (1|
|000036f0| 3c 3c 31 37 29 0d 12 de | 0b e7 20 61 3d 30 20 8c |<<17)...|.. a=0 .|
|00003700| 0d 12 e8 1e c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |......"W|imp_Open|
|00003710| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 0d 12 |Window",|,block..|
|00003720| f2 05 cd 0d 12 fc 0b e7 | 20 62 3d 30 20 8c 0d 13 |........| b=0 ...|
|00003730| 06 2a 62 6c 6f 63 6b 21 | 32 38 3d 2d 31 3a c8 99 |.*block!|28=-1:..|
|00003740| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00003750| 22 2c 2c 62 6c 6f 63 6b | 0d 13 10 05 cd 0d 13 1a |",,block|........|
|00003760| 05 e1 0d 13 24 13 dd f2 | 72 65 64 6f 28 68 61 6e |....$...|redo(han|
|00003770| 64 6c 65 25 29 0d 13 2e | 12 21 62 6c 6f 63 6b 3d |dle%)...|.!block=|
|00003780| 68 61 6e 64 6c 65 25 0d | 13 38 1f c8 99 22 57 69 |handle%.|.8..."Wi|
|00003790| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|000037a0| 2c 62 6c 6f 63 6b 0d 13 | 42 15 f2 6f 70 65 6e 77 |,block..|B..openw|
|000037b0| 69 6e 28 68 61 6e 64 6c | 65 25 29 0d 13 4c 05 e1 |in(handl|e%)..L..|
|000037c0| 0d 13 56 17 dd a4 63 68 | 65 63 6b 69 74 28 68 6e |..V...ch|eckit(hn|
|000037d0| 64 25 2c 69 63 25 29 0d | 13 60 1b 21 69 63 6f 6e |d%,ic%).|.`.!icon|
|000037e0| 64 3d 68 6e 64 25 3a 69 | 63 6f 6e 64 21 34 3d 69 |d=hnd%:i|cond!4=i|
|000037f0| 63 25 0d 13 6a 20 c8 99 | 22 57 69 6d 70 5f 47 65 |c%..j ..|"Wimp_Ge|
|00003800| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 69 63 6f |tIconSta|te",,ico|
|00003810| 6e 64 0d 13 74 13 66 6c | 61 67 73 25 3d 69 63 6f |nd..t.fl|ags%=ico|
|00003820| 6e 64 21 32 34 0d 13 7e | 12 3d 66 6c 61 67 73 25 |nd!24..~|.=flags%|
|00003830| 80 26 46 30 30 30 30 0d | 13 88 19 dd f2 73 6c 61 |.&F0000.|.....sla|
|00003840| 62 69 63 6e 28 68 61 6e | 64 6c 65 2c 69 63 6e 29 |bicn(han|dle,icn)|
|00003850| 0d 13 92 13 69 63 6f 6e | 64 21 31 32 3d 68 61 6e |....icon|d!12=han|
|00003860| 64 6c 65 0d 13 9c 0e 69 | 63 6f 6e 64 21 31 36 3d |dle....i|cond!16=|
|00003870| 32 0d 13 a6 1f c8 99 20 | 22 57 69 6d 70 5f 42 6f |2...... |"Wimp_Bo|
|00003880| 72 64 65 72 49 63 6f 6e | 22 2c 2c 69 63 6f 6e 64 |rderIcon|",,icond|
|00003890| 0d 13 b0 0d 69 63 6f 6e | 64 21 38 3d 30 0d 13 ba |....icon|d!8=0...|
|000038a0| 1f c8 99 20 22 57 69 6d | 70 5f 42 6f 72 64 65 72 |... "Wim|p_Border|
|000038b0| 49 63 6f 6e 22 2c 2c 69 | 63 6f 6e 64 0d 13 c4 05 |Icon",,i|cond....|
|000038c0| e1 0d 13 ce 15 dd 20 f2 | 73 6c 61 62 69 6e 28 68 |...... .|slabin(h|
|000038d0| 61 6e 64 6c 65 29 0d 13 | d8 11 21 69 63 6f 6e 64 |andle)..|..!icond|
|000038e0| 3d 68 61 6e 64 6c 65 0d | 13 e2 23 c8 99 20 22 57 |=handle.|..#.. "W|
|000038f0| 69 6d 70 5f 47 65 74 50 | 6f 69 6e 74 65 72 49 6e |imp_GetP|ointerIn|
|00003900| 66 6f 22 2c 2c 69 63 6f | 6e 64 0d 13 ec 1f c8 99 |fo",,ico|nd......|
|00003910| 20 22 57 69 6d 70 5f 42 | 6f 72 64 65 72 49 63 6f | "Wimp_B|orderIco|
|00003920| 6e 22 2c 2c 69 63 6f 6e | 64 0d 13 f6 05 e1 0d 14 |n",,icon|d.......|
|00003930| 00 16 dd 20 f2 73 6c 61 | 62 6f 75 74 28 68 61 6e |... .sla|bout(han|
|00003940| 64 6c 65 29 0d 14 0a 11 | 21 69 63 6f 6e 64 3d 68 |dle)....|!icond=h|
|00003950| 61 6e 64 6c 65 0d 14 14 | 23 c8 99 20 22 57 69 6d |andle...|#.. "Wim|
|00003960| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|00003970| 22 2c 2c 69 63 6f 6e 64 | 0d 14 1e 0f 69 63 6f 6e |",,icond|....icon|
|00003980| 64 21 38 20 3d 20 30 0d | 14 28 1f c8 99 20 22 57 |d!8 = 0.|.(... "W|
|00003990| 69 6d 70 5f 42 6f 72 64 | 65 72 49 63 6f 6e 22 2c |imp_Bord|erIcon",|
|000039a0| 2c 69 63 6f 6e 64 0d 14 | 32 05 e1 0d 14 3c 0e dd |,icond..|2....<..|
|000039b0| f2 63 6c 65 61 72 61 6c | 6c 0d 14 46 1a c8 99 22 |.clearal|l..F..."|
|000039c0| 4f 53 5f 43 6f 6e 66 69 | 72 6d 22 20 b8 20 70 72 |OS_Confi|rm" . pr|
|000039d0| 65 73 73 0d 14 50 12 e7 | 20 bd 70 72 65 73 73 3d |ess..P..| .press=|
|000039e0| 22 79 22 20 8c 0d 14 5a | 0e e3 20 41 3d 30 20 b8 |"y" ...Z|.. A=0 .|
|000039f0| 20 31 36 0d 14 64 0e e3 | 20 42 3d 30 20 b8 20 31 | 16..d..| B=0 . 1|
|00003a00| 31 0d 14 6e 11 70 73 65 | 74 24 28 41 2c 42 29 3d |1..n.pse|t$(A,B)=|
|00003a10| 22 22 0d 14 78 07 ed 20 | 42 0d 14 82 07 ed 20 41 |""..x.. |B..... A|
|00003a20| 0d 14 8c 15 e7 20 74 6f | 74 3e 2d 31 20 8c 20 74 |..... to|t>-1 . t|
|00003a30| 6f 74 3d 2d 31 0d 14 96 | 15 f2 72 65 64 72 61 77 |ot=-1...|..redraw|
|00003a40| 28 63 69 72 63 75 69 74 | 25 29 0d 14 a0 05 cd 0d |(circuit|%)......|
|00003a50| 14 aa 05 e1 0d 14 b4 18 | dd f2 64 6f 69 74 28 78 |........|..doit(x|
|00003a60| 63 2c 79 63 2c 68 61 6e | 64 6c 65 29 0d 14 be 11 |c,yc,han|dle)....|
|00003a70| 21 62 6c 6f 63 6b 3d 68 | 61 6e 64 6c 65 0d 14 c8 |!block=h|andle...|
|00003a80| 21 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |!.."Wimp|_GetWind|
|00003a90| 6f 77 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 0d 14 |owInfo",|,block..|
|00003aa0| d2 8d e7 20 ac 20 73 61 | 76 65 64 20 8c 20 73 61 |... . sa|ved . sa|
|00003ab0| 76 65 64 3d b9 3a 6e 65 | 77 24 3d 24 28 62 6c 6f |ved=.:ne|w$=$(blo|
|00003ac0| 63 6b 21 37 36 29 2b 22 | 20 2a 22 3a 20 5f 70 25 |ck!76)+"| *": _p%|
|00003ad0| 20 3d 20 21 28 62 6c 6f | 63 6b 2b 37 36 29 3a 24 | = !(blo|ck+76):$|
|00003ae0| 5f 70 25 3d 6e 65 77 24 | 3a c8 99 22 57 69 6d 70 |_p%=new$|:.."Wimp|
|00003af0| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 2d 31 |_ForceRe|draw",-1|
|00003b00| 2c 62 6c 6f 63 6b 21 34 | 2c 28 62 6c 6f 63 6b 21 |,block!4|,(block!|
|00003b10| 31 36 29 2d 33 32 2c 62 | 6c 6f 63 6b 21 31 32 2c |16)-32,b|lock!12,|
|00003b20| 62 6c 6f 63 6b 21 31 36 | 2b 33 36 0d 14 dc 1b 77 |block!16|+36....w|
|00003b30| 6f 72 6b 78 25 3d 62 6c | 6f 63 6b 21 34 2d 62 6c |orkx%=bl|ock!4-bl|
|00003b40| 6f 63 6b 21 32 30 0d 14 | e6 1c 77 6f 72 6b 79 25 |ock!20..|..worky%|
|00003b50| 3d 62 6c 6f 63 6b 21 31 | 36 2d 62 6c 6f 63 6b 21 |=block!1|6-block!|
|00003b60| 32 34 0d 14 f0 14 70 78 | 3d 30 2d 28 77 6f 72 6b |24....px|=0-(work|
|00003b70| 78 25 2d 78 63 29 0d 14 | fa 10 70 79 3d 77 6f 72 |x%-xc)..|..py=wor|
|00003b80| 6b 79 25 2d 79 63 0d 15 | 04 0f 70 78 3d a8 28 70 |ky%-yc..|..px=.(p|
|00003b90| 78 2f 36 32 29 0d 15 0e | 0f 70 79 3d a8 28 70 79 |x/62)...|.py=.(py|
|00003ba0| 2f 36 32 29 0d 15 18 16 | 70 73 65 74 24 28 70 78 |/62)....|pset$(px|
|00003bb0| 2c 70 79 29 3d 74 6f 6f | 6c 24 0d 15 22 48 c8 99 |,py)=too|l$.."H..|
|00003bc0| 20 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 | "Wimp_F|orceRedr|
|00003bd0| 61 77 22 2c 63 69 72 63 | 75 69 74 25 2c 70 78 2a |aw",circ|uit%,px*|
|00003be0| 36 32 2c 30 2d 28 70 79 | 2a 36 32 29 2d 36 32 2c |62,0-(py|*62)-62,|
|00003bf0| 70 78 2a 36 32 2b 36 32 | 2c 30 2d 28 70 79 2a 36 |px*62+62|,0-(py*6|
|00003c00| 32 29 0d 15 2c 05 e1 0d | 15 36 15 dd 20 f2 72 65 |2)..,...|.6.. .re|
|00003c10| 64 72 61 77 28 68 61 6e | 64 6c 65 29 0d 15 40 0d |draw(han|dle)..@.|
|00003c20| 6e 6f 66 6f 6e 74 73 3d | a3 0d 15 4a 11 21 62 6c |nofonts=|...J.!bl|
|00003c30| 6f 63 6b 3d 68 61 6e 64 | 6c 65 0d 15 54 0a ea 6d |ock=hand|le..T..m|
|00003c40| 6f 72 65 25 0d 15 5e 29 | c8 99 20 22 57 69 6d 70 |ore%..^)|.. "Wimp|
|00003c50| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 2c 2c |_RedrawW|indow",,|
|00003c60| 62 6c 6f 63 6b 20 b8 20 | 6d 6f 72 65 25 0d 15 68 |block . |more%..h|
|00003c70| 0c c8 95 20 6d 6f 72 65 | 25 0d 15 72 10 20 c8 8e |... more|%..r. ..|
|00003c80| 20 68 61 6e 64 6c 65 20 | ca 0d 15 7c 0f 20 c9 20 | handle |...|. . |
|00003c90| 63 69 72 63 75 69 74 25 | 0d 15 86 18 20 f2 61 70 |circuit%|.... .ap|
|00003ca0| 70 6c 69 63 61 74 69 6f | 6e 5f 72 65 64 72 61 77 |plicatio|n_redraw|
|00003cb0| 0d 15 90 06 20 7f 0d 15 | 9a 21 20 c8 99 22 57 69 |.... ...|.! .."Wi|
|00003cc0| 6d 70 5f 42 6f 72 64 65 | 72 57 69 6e 64 6f 77 22 |mp_Borde|rWindow"|
|00003cd0| 2c 2c 62 6c 6f 63 6b 0d | 15 a4 06 20 cb 0d 15 ae |,,block.|... ....|
|00003ce0| 29 c8 99 20 22 57 69 6d | 70 5f 47 65 74 52 65 63 |).. "Wim|p_GetRec|
|00003cf0| 74 61 6e 67 6c 65 22 2c | 2c 62 6c 6f 63 6b 20 b8 |tangle",|,block .|
|00003d00| 20 6d 6f 72 65 25 0d 15 | b8 06 20 ce 0d 15 c2 8c | more%..|.. .....|
|00003d10| e7 20 6e 6f 66 6f 6e 74 | 73 20 80 20 66 6f 6e 74 |. nofont|s . font|
|00003d20| 6d 65 73 73 3d a3 20 8c | 20 f2 71 75 65 72 79 28 |mess=. .| .query(|
|00003d30| 22 54 68 69 73 20 77 69 | 6e 64 6f 77 20 63 6f 6e |"This wi|ndow con|
|00003d40| 74 61 69 6e 73 20 74 65 | 78 74 2e 20 50 6c 65 61 |tains te|xt. Plea|
|00003d50| 73 65 20 6c 6f 63 61 74 | 65 20 74 68 65 20 21 46 |se locat|e the !F|
|00003d60| 6f 6e 74 73 20 64 69 72 | 65 63 74 6f 72 79 20 74 |onts dir|ectory t|
|00003d70| 6f 20 65 6e 61 62 6c 65 | 20 74 65 78 74 20 74 6f |o enable| text to|
|00003d80| 20 62 65 20 73 65 65 6e | 2e 22 29 3a 66 6f 6e 74 | be seen|."):font|
|00003d90| 6d 65 73 73 3d b9 3a e1 | 0d 15 cc 05 e1 0d 15 d6 |mess=.:.|........|
|00003da0| 18 dd f2 61 70 70 6c 69 | 63 61 74 69 6f 6e 5f 72 |...appli|cation_r|
|00003db0| 65 64 72 61 77 0d 15 e0 | 1b 77 6f 72 6b 78 25 3d |edraw...|.workx%=|
|00003dc0| 62 6c 6f 63 6b 21 34 2d | 62 6c 6f 63 6b 21 32 30 |block!4-|block!20|
|00003dd0| 0d 15 ea 1c 77 6f 72 6b | 79 25 3d 62 6c 6f 63 6b |....work|y%=block|
|00003de0| 21 31 36 2d 62 6c 6f 63 | 6b 21 32 34 0d 15 f4 0d |!16-bloc|k!24....|
|00003df0| f2 6d 6f 64 65 70 72 6f | 63 0d 15 fe 33 c8 99 20 |.modepro|c...3.. |
|00003e00| 26 32 45 2c 32 35 36 2b | 34 30 2c 73 70 72 25 2c |&2E,256+|40,spr%,|
|00003e10| 22 6c 65 64 55 22 20 b8 | 20 41 2c 42 2c 43 2c 77 |"ledU" .| A,B,C,w|
|00003e20| 25 2c 68 25 2c 44 2c 6d | 6f 64 65 25 0d 16 08 2e |%,h%,D,m|ode%....|
|00003e30| c8 99 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |.."OS_Re|adModeVa|
|00003e40| 72 69 61 62 6c 65 22 2c | 6d 6f 64 65 25 2c 33 20 |riable",|mode%,3 |
|00003e50| b8 63 2c 63 6c 2c 63 6f | 6c 73 0d 16 12 2c c8 99 |.c,cl,co|ls...,..|
|00003e60| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|00003e70| 61 62 6c 65 22 2c 6d 6f | 64 65 25 2c 34 20 b8 2c |able",mo|de%,4 .,|
|00003e80| 2c 78 65 69 67 25 0d 16 | 1c 2c c8 99 22 4f 53 5f |,xeig%..|.,.."OS_|
|00003e90| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00003ea0| 22 2c 6d 6f 64 65 25 2c | 35 20 b8 2c 2c 79 65 69 |",mode%,|5 .,,yei|
|00003eb0| 67 25 0d 16 26 11 77 69 | 25 3d 77 25 3c 3c 78 65 |g%..&.wi|%=w%<<xe|
|00003ec0| 69 67 25 0d 16 30 11 68 | 65 25 3d 68 25 3c 3c 79 |ig%..0.h|e%=h%<<y|
|00003ed0| 65 69 67 25 0d 16 3a 13 | e7 20 21 28 34 2b 73 70 |eig%..:.|. !(4+sp|
|00003ee0| 72 25 29 3e 30 20 8c 0d | 16 44 15 e7 20 21 28 34 |r%)>0 ..|.D.. !(4|
|00003ef0| 38 2b 73 70 72 25 29 3e | 34 34 20 8c 0d 16 4e 11 |8+spr%)>|44 ...N.|
|00003f00| e3 20 63 6f 6c 25 3d 30 | 20 b8 20 31 35 0d 16 58 |. col%=0| . 15..X|
|00003f10| 27 70 61 6c 65 74 74 65 | 25 21 28 63 6f 6c 25 2a |'palette|%!(col%*|
|00003f20| 34 29 3d 21 28 36 30 2b | 63 6f 6c 25 2a 38 2b 73 |4)=!(60+|col%*8+s|
|00003f30| 70 72 25 29 0d 16 62 0a | ed 20 63 6f 6c 25 0d 16 |pr%)..b.|. col%..|
|00003f40| 6c 44 c8 99 20 22 43 6f | 6c 6f 75 72 54 72 61 6e |lD.. "Co|lourTran|
|00003f50| 73 5f 53 65 6c 65 63 74 | 54 61 62 6c 65 22 2c 21 |s_Select|Table",!|
|00003f60| 28 35 36 2b 73 70 72 25 | 29 2c 70 61 6c 65 74 74 |(56+spr%|),palett|
|00003f70| 65 25 2c 2d 31 2c 2d 31 | 2c 73 63 61 6c 62 6c 6f |e%,-1,-1|,scalblo|
|00003f80| 63 6b 0d 16 76 05 cc 0d | 16 80 43 c8 99 20 22 43 |ck..v...|..C.. "C|
|00003f90| 6f 6c 6f 75 72 54 72 61 | 6e 73 5f 53 65 6c 65 63 |olourTra|ns_Selec|
|00003fa0| 74 54 61 62 6c 65 22 2c | 21 28 35 36 2b 73 70 72 |tTable",|!(56+spr|
|00003fb0| 25 29 2c 64 65 66 70 61 | 6c 25 2c 2d 31 2c 2d 31 |%),defpa|l%,-1,-1|
|00003fc0| 2c 73 63 61 6c 62 6c 6f | 63 6b 0d 16 8a 05 cd 0d |,scalblo|ck......|
|00003fd0| 16 94 05 cd 0d 16 9e 11 | e3 20 41 3d 30 20 b8 20 |........|. A=0 . |
|00003fe0| 67 72 69 64 78 0d 16 a8 | 11 e3 20 42 3d 30 20 b8 |gridx...|.. B=0 .|
|00003ff0| 20 67 72 69 64 79 0d 16 | b2 15 e7 20 70 73 65 74 | gridy..|... pset|
|00004000| 24 28 41 2c 42 29 3e 22 | 22 20 8c 0d 16 bc 4e c8 |$(A,B)>"|" ....N.|
|00004010| 99 20 34 36 2c 26 31 33 | 34 2c 73 70 72 25 2c 70 |. 46,&13|4,spr%,p|
|00004020| 73 65 74 24 28 41 2c 42 | 29 2c 77 6f 72 6b 78 25 |set$(A,B|),workx%|
|00004030| 2b 28 41 2a 36 32 29 2c | 77 6f 72 6b 79 25 2d 28 |+(A*62),|worky%-(|
|00004040| 42 2a 36 32 29 2d 36 32 | 2c 38 2c 73 63 61 6c 2c |B*62)-62|,8,scal,|
|00004050| 73 63 61 6c 62 6c 6f 63 | 6b 0d 16 c6 05 cd 0d 16 |scalbloc|k.......|
|00004060| d0 07 ed 20 42 0d 16 da | 07 ed 20 41 0d 16 e4 0e |... B...|.. A....|
|00004070| e7 20 74 6f 74 3e 2d 31 | 20 8c 0d 16 ee 0d 6e 6f |. tot>-1| .....no|
|00004080| 66 6f 6e 74 73 3d a3 0d | 16 f8 09 6e 75 6d 3d 30 |fonts=..|...num=0|
|00004090| 0d 17 02 2b c8 99 20 22 | 58 46 6f 6e 74 5f 4c 69 |...+.. "|XFont_Li|
|000040a0| 73 74 46 6f 6e 74 73 22 | 2c 2c 69 63 6f 6e 64 2c |stFonts"|,,icond,|
|000040b0| 6e 75 6d 20 b8 20 2c 2c | 6e 75 6d 0d 17 0c 18 e7 |num . ,,|num.....|
|000040c0| 20 6e 75 6d 3d 2d 31 20 | 8c 20 6e 6f 66 6f 6e 74 | num=-1 |. nofont|
|000040d0| 73 3d b9 0d 17 16 11 e7 | 20 ac 20 6e 6f 66 6f 6e |s=......| . nofon|
|000040e0| 74 73 20 8c 0d 17 20 0d | f2 66 69 6e 64 66 6f 6e |ts ... .|.findfon|
|000040f0| 74 0d 17 2a 0f e3 20 49 | 3d 30 20 b8 20 74 6f 74 |t..*.. I|=0 . tot|
|00004100| 0d 17 34 1a f2 77 6f 72 | 6b 6f 75 74 28 74 65 78 |..4..wor|kout(tex|
|00004110| 74 69 6e 66 6f 24 28 49 | 29 29 0d 17 3e 17 70 78 |tinfo$(I|))..>.px|
|00004120| 32 3d 30 2d 28 77 6f 72 | 6b 78 25 2d 77 78 63 6f |2=0-(wor|kx%-wxco|
|00004130| 29 0d 17 48 13 70 79 32 | 3d 77 6f 72 6b 79 25 2d |)..H.py2|=worky%-|
|00004140| 77 79 63 6f 0d 17 52 1a | c8 99 22 46 6f 6e 74 5f |wyco..R.|.."Font_|
|00004150| 53 65 74 46 6f 6e 74 22 | 2c 66 6f 6e 74 25 0d 17 |SetFont"|,font%..|
|00004160| 5c 39 c8 99 22 46 6f 6e | 74 5f 50 61 69 6e 74 22 |\9.."Fon|t_Paint"|
|00004170| 2c 2c 77 74 65 78 74 24 | 2c 25 31 30 30 31 30 2c |,,wtext$|,%10010,|
|00004180| 77 6f 72 6b 78 25 2b 77 | 78 63 6f 2c 77 6f 72 6b |workx%+w|xco,work|
|00004190| 79 25 2d 77 79 63 6f 0d | 17 66 05 ed 0d 17 70 05 |y%-wyco.|.f....p.|
|000041a0| cd 0d 17 7a 05 cd 0d 17 | 84 05 e1 0d 17 8e 0e dd |...z....|........|
|000041b0| f2 66 69 6e 64 66 6f 6e | 74 0d 17 98 44 c8 99 22 |.findfon|t...D.."|
|000041c0| 58 46 6f 6e 74 5f 46 69 | 6e 64 46 6f 6e 74 22 2c |XFont_Fi|ndFont",|
|000041d0| 2c 22 54 72 69 6e 69 74 | 79 2e 4d 65 64 69 75 6d |,"Trinit|y.Medium|
|000041e0| 22 2c 31 32 2a 31 36 2c | 31 32 2a 31 36 20 b8 20 |",12*16,|12*16 . |
|000041f0| 66 6f 6e 74 25 3a 66 6f | 75 6e 64 3d b9 0d 17 a2 |font%:fo|und=....|
|00004200| 13 e7 20 66 6f 6e 74 25 | 21 30 3d 35 32 33 20 8c |.. font%|!0=523 .|
|00004210| 0d 17 ac 09 6e 75 6d 3d | 30 0d 17 b6 2b c8 99 20 |....num=|0...+.. |
|00004220| 22 58 46 6f 6e 74 5f 4c | 69 73 74 46 6f 6e 74 73 |"XFont_L|istFonts|
|00004230| 22 2c 2c 69 63 6f 6e 64 | 2c 6e 75 6d 20 b8 20 2c |",,icond|,num . ,|
|00004240| 2c 6e 75 6d 0d 17 c0 11 | 73 66 6f 6e 74 24 3d 24 |,num....|sfont$=$|
|00004250| 69 63 6f 6e 64 0d 17 ca | 39 c8 99 22 46 6f 6e 74 |icond...|9.."Font|
|00004260| 5f 46 69 6e 64 46 6f 6e | 74 22 2c 2c 73 66 6f 6e |_FindFon|t",,sfon|
|00004270| 74 24 2c 31 32 2a 31 36 | 2c 31 32 2a 31 36 20 b8 |t$,12*16|,12*16 .|
|00004280| 20 66 6f 6e 74 25 3a 66 | 6f 75 6e 64 3d b9 0d 17 | font%:f|ound=...|
|00004290| d4 05 cd 0d 17 de 05 e1 | 0d 17 e8 1b dd f2 63 6c |........|......cl|
|000042a0| 65 61 72 69 74 28 78 63 | 2c 79 63 2c 68 61 6e 64 |earit(xc|,yc,hand|
|000042b0| 6c 65 29 0d 17 f2 19 76 | 78 3d 62 6c 6f 63 6b 21 |le)....v|x=block!|
|000042c0| 30 3a 76 79 3d 62 6c 6f | 63 6b 21 34 0d 17 fc 11 |0:vy=blo|ck!4....|
|000042d0| 21 62 6c 6f 63 6b 3d 68 | 61 6e 64 6c 65 0d 18 06 |!block=h|andle...|
|000042e0| 21 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |!.."Wimp|_GetWind|
|000042f0| 6f 77 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 0d 18 |owInfo",|,block..|
|00004300| 10 8d e7 20 ac 20 73 61 | 76 65 64 20 8c 20 73 61 |... . sa|ved . sa|
|00004310| 76 65 64 3d b9 3a 6e 65 | 77 24 3d 24 28 62 6c 6f |ved=.:ne|w$=$(blo|
|00004320| 63 6b 21 37 36 29 2b 22 | 20 2a 22 3a 20 5f 70 25 |ck!76)+"| *": _p%|
|00004330| 20 3d 20 21 28 62 6c 6f | 63 6b 2b 37 36 29 3a 24 | = !(blo|ck+76):$|
|00004340| 5f 70 25 3d 6e 65 77 24 | 3a c8 99 22 57 69 6d 70 |_p%=new$|:.."Wimp|
|00004350| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 2d 31 |_ForceRe|draw",-1|
|00004360| 2c 62 6c 6f 63 6b 21 34 | 2c 28 62 6c 6f 63 6b 21 |,block!4|,(block!|
|00004370| 31 36 29 2d 33 32 2c 62 | 6c 6f 63 6b 21 31 32 2c |16)-32,b|lock!12,|
|00004380| 62 6c 6f 63 6b 21 31 36 | 2b 33 36 0d 18 1a 1b 77 |block!16|+36....w|
|00004390| 6f 72 6b 78 25 3d 62 6c | 6f 63 6b 21 34 2d 62 6c |orkx%=bl|ock!4-bl|
|000043a0| 6f 63 6b 21 32 30 0d 18 | 24 1c 77 6f 72 6b 79 25 |ock!20..|$.worky%|
|000043b0| 3d 62 6c 6f 63 6b 21 31 | 36 2d 62 6c 6f 63 6b 21 |=block!1|6-block!|
|000043c0| 32 34 0d 18 2e 14 70 78 | 3d 30 2d 28 77 6f 72 6b |24....px|=0-(work|
|000043d0| 78 25 2d 78 63 29 0d 18 | 38 10 70 79 3d 77 6f 72 |x%-xc)..|8.py=wor|
|000043e0| 6b 79 25 2d 79 63 0d 18 | 42 0f 70 78 3d a8 28 70 |ky%-yc..|B.px=.(p|
|000043f0| 78 2f 36 32 29 0d 18 4c | 0f 70 79 3d a8 28 70 79 |x/62)..L|.py=.(py|
|00004400| 2f 36 32 29 0d 18 56 13 | 70 73 65 74 24 28 70 78 |/62)..V.|pset$(px|
|00004410| 2c 70 79 29 3d 22 22 0d | 18 60 07 e6 20 30 0d 18 |,py)="".|.`.. 0..|
|00004420| 6a 49 c8 99 22 57 69 6d | 70 5f 46 6f 72 63 65 52 |jI.."Wim|p_ForceR|
|00004430| 65 64 72 61 77 22 2c 63 | 69 72 63 75 69 74 25 2c |edraw",c|ircuit%,|
|00004440| 70 78 2a 36 32 2c 30 2d | 28 70 79 2a 36 32 29 2d |px*62,0-|(py*62)-|
|00004450| 36 32 2c 28 70 78 2a 36 | 32 29 2b 36 32 2c 30 2d |62,(px*6|2)+62,0-|
|00004460| 28 70 79 2a 36 32 29 0d | 18 74 10 f2 64 6f 65 6d |(py*62).|.t..doem|
|00004470| 28 76 78 2c 76 79 29 0d | 18 7e 05 e1 0d 18 88 15 |(vx,vy).|.~......|
|00004480| dd f2 67 6f 74 65 78 74 | 28 78 63 6f 2c 79 63 6f |..gotext|(xco,yco|
|00004490| 29 0d 18 92 09 6e 75 6d | 3d 30 0d 18 9c 2b c8 99 |)....num|=0...+..|
|000044a0| 20 22 58 46 6f 6e 74 5f | 4c 69 73 74 46 6f 6e 74 | "XFont_|ListFont|
|000044b0| 73 22 2c 2c 69 63 6f 6e | 64 2c 6e 75 6d 20 b8 20 |s",,icon|d,num . |
|000044c0| 2c 2c 6e 75 6d 0d 18 a6 | 11 66 66 6f 6e 74 24 3d |,,num...|.ffont$=|
|000044d0| 24 69 63 6f 6e 64 0d 18 | b0 5a e7 20 6e 75 6d 3d |$icond..|.Z. num=|
|000044e0| 2d 31 20 8c 20 f2 71 75 | 65 72 79 28 22 50 6c 65 |-1 . .qu|ery("Ple|
|000044f0| 61 73 65 20 6c 6f 63 61 | 74 65 20 74 68 65 20 21 |ase loca|te the !|
|00004500| 46 6f 6e 74 73 20 64 69 | 72 65 63 74 6f 72 79 20 |Fonts di|rectory |
|00004510| 74 6f 20 65 6e 61 62 6c | 65 20 74 65 78 74 20 74 |to enabl|e text t|
|00004520| 6f 20 62 65 20 65 6e 74 | 72 65 64 2e 22 29 3a e1 |o be ent|red."):.|
|00004530| 0d 18 ba 18 e7 20 74 6f | 6f 6c 24 3d 22 70 74 72 |..... to|ol$="ptr|
|00004540| 5f 74 65 78 74 22 20 e1 | 0d 18 c4 12 6f 6c 64 74 |_text" .|....oldt|
|00004550| 6f 6f 6c 24 3d 74 6f 6f | 6c 24 0d 18 ce 14 74 6f |ool$=too|l$....to|
|00004560| 6f 6c 24 3d 22 70 74 72 | 5f 74 65 78 74 22 0d 18 |ol$="ptr|_text"..|
|00004570| d8 0a 74 65 78 74 3d b9 | 0d 18 e2 11 21 62 6c 6f |..text=.|....!blo|
|00004580| 63 6b 3d 65 6e 74 65 72 | 25 0d 18 ec 21 c8 99 22 |ck=enter|%...!.."|
|00004590| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|000045a0| 66 6f 22 2c 2c 62 6c 6f | 63 6b 0d 18 f6 43 62 6c |fo",,blo|ck...Cbl|
|000045b0| 6f 63 6b 21 34 3d 78 63 | 6f 2b 31 30 30 3a 62 6c |ock!4=xc|o+100:bl|
|000045c0| 6f 63 6b 21 31 32 3d 78 | 63 6f 2b 34 33 30 3a 62 |ock!12=x|co+430:b|
|000045d0| 6c 6f 63 6b 21 38 3d 79 | 63 6f 2d 34 36 2d 34 38 |lock!8=y|co-46-48|
|000045e0| 3a 62 6c 6f 63 6b 21 31 | 36 3d 79 63 6f 0d 19 00 |:block!1|6=yco...|
|000045f0| 1e c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |..."Wimp|_OpenWin|
|00004600| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 0d 19 0a 30 c8 |dow",,bl|ock...0.|
|00004610| 99 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 |."Wimp_S|etCaretP|
|00004620| 6f 73 69 74 69 6f 6e 22 | 2c 65 6e 74 65 72 25 2c |osition"|,enter%,|
|00004630| 30 2c 30 2c 30 2c 2d 31 | 2c 2d 31 0d 19 14 05 e1 |0,0,0,-1|,-1.....|
|00004640| 0d 19 1e 15 dd f2 64 6f | 74 65 78 74 28 78 63 6f |......do|text(xco|
|00004650| 2c 79 63 6f 29 0d 19 28 | 0e e7 20 74 6f 74 3d 35 |,yco)..(|.. tot=5|
|00004660| 30 20 e1 0d 19 32 1b e7 | 20 24 a4 69 6e 66 6f 28 |0 ...2..| $.info(|
|00004670| 65 6e 74 65 72 25 2c 30 | 29 3d 22 22 20 e1 0d 19 |enter%,0|)="" ...|
|00004680| 3c 0a 74 6f 74 2b 3d 31 | 0d 19 46 0d f2 66 69 6e |<.tot+=1|..F..fin|
|00004690| 64 66 6f 6e 74 0d 19 50 | 1a c8 99 22 46 6f 6e 74 |dfont..P|..."Font|
|000046a0| 5f 53 65 74 46 6f 6e 74 | 22 2c 66 6f 6e 74 25 0d |_SetFont|",font%.|
|000046b0| 19 5a 59 c8 99 22 46 6f | 6e 74 5f 53 74 72 69 6e |.ZY.."Fo|nt_Strin|
|000046c0| 67 57 69 64 74 68 22 2c | 2c 24 a4 69 6e 66 6f 28 |gWidth",|,$.info(|
|000046d0| 65 6e 74 65 72 25 2c 30 | 29 2c 32 32 38 30 30 30 |enter%,0|),228000|
|000046e0| 2c 32 32 38 30 30 30 2c | 33 31 2c a9 28 24 a4 69 |,228000,|31,.($.i|
|000046f0| 6e 66 6f 28 65 6e 74 65 | 72 25 2c 30 29 29 20 b8 |nfo(ente|r%,0)) .|
|00004700| 20 2c 2c 78 25 2c 79 25 | 0d 19 64 26 c8 99 22 46 | ,,x%,y%|..d&.."F|
|00004710| 6f 6e 74 5f 43 6f 6e 76 | 65 72 74 74 6f 4f 53 22 |ont_Conv|erttoOS"|
|00004720| 2c 2c 78 25 2c 79 25 20 | b8 20 2c 78 2c 79 0d 19 |,,x%,y% |. ,x,y..|
|00004730| 6e 13 21 62 6c 6f 63 6b | 3d 63 69 72 63 75 69 74 |n.!block|=circuit|
|00004740| 25 0d 19 78 21 c8 99 22 | 57 69 6d 70 5f 47 65 74 |%..x!.."|Wimp_Get|
|00004750| 57 69 6e 64 6f 77 49 6e | 66 6f 22 2c 2c 62 6c 6f |WindowIn|fo",,blo|
|00004760| 63 6b 0d 19 82 8d e7 20 | ac 20 73 61 76 65 64 20 |ck..... |. saved |
|00004770| 8c 20 73 61 76 65 64 3d | b9 3a 6e 65 77 24 3d 24 |. saved=|.:new$=$|
|00004780| 28 62 6c 6f 63 6b 21 37 | 36 29 2b 22 20 2a 22 3a |(block!7|6)+" *":|
|00004790| 20 5f 70 25 20 3d 20 21 | 28 62 6c 6f 63 6b 2b 37 | _p% = !|(block+7|
|000047a0| 36 29 3a 24 5f 70 25 3d | 6e 65 77 24 3a c8 99 22 |6):$_p%=|new$:.."|
|000047b0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|000047c0| 22 2c 2d 31 2c 62 6c 6f | 63 6b 21 34 2c 28 62 6c |",-1,blo|ck!4,(bl|
|000047d0| 6f 63 6b 21 31 36 29 2d | 33 32 2c 62 6c 6f 63 6b |ock!16)-|32,block|
|000047e0| 21 31 32 2c 62 6c 6f 63 | 6b 21 31 36 2b 33 36 0d |!12,bloc|k!16+36.|
|000047f0| 19 8c 1b 77 6f 72 6b 78 | 25 3d 62 6c 6f 63 6b 21 |...workx|%=block!|
|00004800| 34 2d 62 6c 6f 63 6b 21 | 32 30 0d 19 96 1c 77 6f |4-block!|20....wo|
|00004810| 72 6b 79 25 3d 62 6c 6f | 63 6b 21 31 36 2d 62 6c |rky%=blo|ck!16-bl|
|00004820| 6f 63 6b 21 32 34 0d 19 | a0 15 70 78 3d 30 2d 28 |ock!24..|..px=0-(|
|00004830| 77 6f 72 6b 78 25 2d 78 | 63 6f 29 0d 19 aa 11 70 |workx%-x|co)....p|
|00004840| 79 3d 77 6f 72 6b 79 25 | 2d 79 63 6f 0d 19 b4 3a |y=worky%|-yco...:|
|00004850| 74 65 78 74 69 6e 66 6f | 24 28 74 6f 74 29 3d 24 |textinfo|$(tot)=$|
|00004860| a4 69 6e 66 6f 28 65 6e | 74 65 72 25 2c 30 29 2b |.info(en|ter%,0)+|
|00004870| 22 2c 22 2b c3 70 78 2b | 22 2c 22 2b c3 70 79 2b |","+.px+|","+.py+|
|00004880| 22 2c 22 2b c3 78 0d 19 | be 49 c8 99 20 22 57 69 |","+.x..|.I.. "Wi|
|00004890| 6d 70 5f 46 6f 72 63 65 | 52 65 64 72 61 77 22 2c |mp_Force|Redraw",|
|000048a0| 2d 31 2c 77 6f 72 6b 78 | 25 2b 70 78 2c 77 6f 72 |-1,workx|%+px,wor|
|000048b0| 6b 79 25 2d 70 79 2c 77 | 6f 72 6b 78 25 2b 70 78 |ky%-py,w|orkx%+px|
|000048c0| 2b 78 2c 77 6f 72 6b 79 | 25 2d 70 79 2b 33 32 0d |+x,worky|%-py+32.|
|000048d0| 19 c8 11 21 62 6c 6f 63 | 6b 3d 65 6e 74 65 72 25 |...!bloc|k=enter%|
|000048e0| 0d 19 d2 11 21 62 6c 6f | 63 6b 3d 65 6e 74 65 72 |....!blo|ck=enter|
|000048f0| 25 0d 19 dc 1f c8 99 22 | 57 69 6d 70 5f 43 6c 6f |%......"|Wimp_Clo|
|00004900| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|00004910| 0d 19 e6 0a 74 65 78 74 | 3d a3 0d 19 f0 12 74 6f |....text|=.....to|
|00004920| 6f 6c 24 3d 6f 6c 64 74 | 6f 6f 6c 24 0d 19 fa 35 |ol$=oldt|ool$...5|
|00004930| 24 70 6f 69 6e 74 25 3d | 74 6f 6f 6c 24 3a c8 99 |$point%=|tool$:..|
|00004940| 20 22 57 69 6d 70 5f 53 | 70 72 69 74 65 4f 70 22 | "Wimp_S|priteOp"|
|00004950| 2c 33 36 2c 2c 70 6f 69 | 6e 74 25 2c 31 2c 38 2c |,36,,poi|nt%,1,8,|
|00004960| 38 0d 1a 04 05 e1 0d 1a | 0e 11 dd f2 64 6f 65 6d |8.......|....doem|
|00004970| 28 6d 78 2c 6d 79 29 0d | 1a 18 0e e7 20 74 6f 74 |(mx,my).|.... tot|
|00004980| 3d 2d 31 20 e1 0d 1a 22 | 13 21 62 6c 6f 63 6b 3d |=-1 ..."|.!block=|
|00004990| 63 69 72 63 75 69 74 25 | 0d 1a 2c 21 c8 99 22 57 |circuit%|..,!.."W|
|000049a0| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 49 6e 66 |imp_GetW|indowInf|
|000049b0| 6f 22 2c 2c 62 6c 6f 63 | 6b 0d 1a 36 1b 77 6f 72 |o",,bloc|k..6.wor|
|000049c0| 6b 78 25 3d 62 6c 6f 63 | 6b 21 34 2d 62 6c 6f 63 |kx%=bloc|k!4-bloc|
|000049d0| 6b 21 32 30 0d 1a 40 1c | 77 6f 72 6b 79 25 3d 62 |k!20..@.|worky%=b|
|000049e0| 6c 6f 63 6b 21 31 36 2d | 62 6c 6f 63 6b 21 32 34 |lock!16-|block!24|
|000049f0| 0d 1a 4a 0f e3 20 49 3d | 30 20 b8 20 74 6f 74 0d |..J.. I=|0 . tot.|
|00004a00| 1a 54 1a f2 77 6f 72 6b | 6f 75 74 28 74 65 78 74 |.T..work|out(text|
|00004a10| 69 6e 66 6f 24 28 49 29 | 29 0d 1a 5e 12 70 78 3d |info$(I)|)..^.px=|
|00004a20| 77 6f 72 6b 78 25 2b 77 | 78 63 6f 0d 1a 68 17 70 |workx%+w|xco..h.p|
|00004a30| 78 32 3d 30 2d 28 77 6f | 72 6b 78 25 2d 77 78 63 |x2=0-(wo|rkx%-wxc|
|00004a40| 6f 29 0d 1a 72 12 70 79 | 3d 77 6f 72 6b 79 25 2d |o)..r.py|=worky%-|
|00004a50| 77 79 63 6f 0d 1a 7c 3b | e7 20 6d 78 3e 70 78 2d |wyco..|;|. mx>px-|
|00004a60| 33 31 20 80 20 6d 78 3c | 70 78 2b 77 77 69 64 74 |31 . mx<|px+wwidt|
|00004a70| 68 2b 33 31 20 80 20 6d | 79 3e 70 79 2d 33 31 20 |h+31 . m|y>py-31 |
|00004a80| 80 20 6d 79 3c 70 79 2b | 32 34 2b 33 31 20 8c 0d |. my<py+|24+31 ..|
|00004a90| 1a 86 08 e6 20 31 35 0d | 1a 90 1f f2 76 69 61 62 |.... 15.|....viab|
|00004aa0| 6c 65 28 77 74 65 78 74 | 24 2c 62 6c 6f 63 6b 21 |le(wtext|$,block!|
|00004ab0| 31 32 2c 70 78 29 0d 1a | 9a 3b c8 99 22 46 6f 6e |12,px)..|.;.."Fon|
|00004ac0| 74 5f 50 61 69 6e 74 22 | 2c 2c 6e 65 77 74 65 78 |t_Paint"|,,newtex|
|00004ad0| 74 24 2c 25 31 30 30 31 | 30 2c 77 6f 72 6b 78 25 |t$,%1001|0,workx%|
|00004ae0| 2b 77 78 63 6f 2c 77 6f | 72 6b 79 25 2d 77 79 63 |+wxco,wo|rky%-wyc|
|00004af0| 6f 0d 1a a4 05 cd 0d 1a | ae 05 ed 0d 1a b8 05 e1 |o.......|........|
|00004b00| 0d 1a c2 14 dd f2 77 6f | 72 6b 6f 75 74 28 77 6f |......wo|rkout(wo|
|00004b10| 72 6b 24 29 0d 1a cc 20 | 77 74 65 78 74 24 3d c0 |rk$)... |wtext$=.|
|00004b20| 77 6f 72 6b 24 2c a7 77 | 6f 72 6b 24 2c 22 2c 22 |work$,.w|ork$,","|
|00004b30| 29 2d 31 29 0d 1a d6 26 | 77 6f 72 6b 24 3d c2 77 |)-1)...&|work$=.w|
|00004b40| 6f 72 6b 24 2c a9 28 77 | 6f 72 6b 24 29 2d a7 77 |ork$,.(w|ork$)-.w|
|00004b50| 6f 72 6b 24 2c 22 2c 22 | 29 29 0d 1a e0 21 77 78 |ork$,","|))...!wx|
|00004b60| 63 6f 3d bb 28 c0 77 6f | 72 6b 24 2c a7 77 6f 72 |co=.(.wo|rk$,.wor|
|00004b70| 6b 24 2c 22 2c 22 29 2d | 31 29 29 0d 1a ea 26 77 |k$,",")-|1))...&w|
|00004b80| 6f 72 6b 24 3d c2 77 6f | 72 6b 24 2c a9 28 77 6f |ork$=.wo|rk$,.(wo|
|00004b90| 72 6b 24 29 2d a7 77 6f | 72 6b 24 2c 22 2c 22 29 |rk$)-.wo|rk$,",")|
|00004ba0| 29 0d 1a f4 21 77 79 63 | 6f 3d bb 28 c0 77 6f 72 |)...!wyc|o=.(.wor|
|00004bb0| 6b 24 2c a7 77 6f 72 6b | 24 2c 22 2c 22 29 2d 31 |k$,.work|$,",")-1|
|00004bc0| 29 29 0d 1a fe 26 77 6f | 72 6b 24 3d c2 77 6f 72 |))...&wo|rk$=.wor|
|00004bd0| 6b 24 2c a9 28 77 6f 72 | 6b 24 29 2d a7 77 6f 72 |k$,.(wor|k$)-.wor|
|00004be0| 6b 24 2c 22 2c 22 29 29 | 0d 1b 08 23 77 77 69 64 |k$,","))|...#wwid|
|00004bf0| 74 68 3d bb 28 c0 77 6f | 72 6b 24 2c a7 77 6f 72 |th=.(.wo|rk$,.wor|
|00004c00| 6b 24 2c 22 2c 22 29 2d | 31 29 29 0d 1b 12 05 e1 |k$,",")-|1)).....|
|00004c10| 0d 1b 1c 17 dd f2 76 69 | 61 62 6c 65 28 64 74 24 |......vi|able(dt$|
|00004c20| 2c 79 31 2c 79 32 29 0d | 1b 26 05 f5 0d 1b 30 18 |,y1,y2).|.&....0.|
|00004c30| 78 79 3d a4 77 69 64 74 | 68 28 64 74 24 2c 79 31 |xy=.widt|h(dt$,y1|
|00004c40| 2d 79 32 29 0d 1b 3a 1d | e7 20 78 79 3d 30 20 64 |-y2)..:.|. xy=0 d|
|00004c50| 74 24 3d c0 64 74 24 2c | a9 28 64 74 24 29 2d 31 |t$=.dt$,|.(dt$)-1|
|00004c60| 29 0d 1b 44 0a fd 20 78 | 79 3e 30 0d 1b 4e 10 6e |)..D.. x|y>0..N.n|
|00004c70| 65 77 74 65 78 74 24 3d | 64 74 24 0d 1b 58 05 e1 |ewtext$=|dt$..X..|
|00004c80| 0d 1b 62 16 dd a4 77 69 | 64 74 68 28 66 74 65 78 |..b...wi|dth(ftex|
|00004c90| 74 24 2c 6f 70 29 0d 1b | 6c 1a c8 99 22 46 6f 6e |t$,op)..|l..."Fon|
|00004ca0| 74 5f 53 65 74 46 6f 6e | 74 22 2c 66 6f 6e 74 25 |t_SetFon|t",font%|
|00004cb0| 0d 1b 76 2e c8 99 22 46 | 6f 6e 74 5f 43 6f 6e 76 |..v..."F|ont_Conv|
|00004cc0| 65 72 74 74 6f 70 6f 69 | 6e 74 73 22 2c 2c 6f 70 |erttopoi|nts",,op|
|00004cd0| 2c 6f 70 20 b8 20 2c 78 | 63 79 2c 79 63 79 0d 1b |,op . ,x|cy,ycy..|
|00004ce0| 80 3f c8 99 22 46 6f 6e | 74 5f 53 74 72 69 6e 67 |.?.."Fon|t_String|
|00004cf0| 57 69 64 74 68 22 2c 2c | 66 74 65 78 74 24 2c 78 |Width",,|ftext$,x|
|00004d00| 63 79 2c 79 63 79 2c 33 | 31 2c a9 28 66 74 65 78 |cy,ycy,3|1,.(ftex|
|00004d10| 74 24 29 20 b8 20 2c 2c | 78 25 2c 79 25 0d 1b 8a |t$) . ,,|x%,y%...|
|00004d20| 07 3d 78 25 0d 1b 94 0e | dd a4 61 73 6b 28 66 6e |.=x%....|..ask(fn|
|00004d30| 24 29 0d 1b 9e 1e 21 69 | 63 6f 6e 64 3d 30 3a 24 |$)....!i|cond=0:$|
|00004d40| 28 69 63 6f 6e 64 2b 34 | 29 3d 66 6e 24 2b bd 30 |(icond+4|)=fn$+.0|
|00004d50| 0d 1b a8 34 c8 99 22 57 | 69 6d 70 5f 52 65 70 6f |...4.."W|imp_Repo|
|00004d60| 72 74 45 72 72 6f 72 22 | 2c 69 63 6f 6e 64 2c 26 |rtError"|,icond,&|
|00004d70| 31 33 2c 22 21 43 69 72 | 63 75 69 74 22 20 b8 20 |13,"!Cir|cuit" . |
|00004d80| 2c 62 75 74 0d 1b b2 08 | 3d 62 75 74 0d 1b bc 14 |,but....|=but....|
|00004d90| dd f2 64 65 6c 74 65 78 | 74 28 78 67 2c 79 67 29 |..deltex|t(xg,yg)|
|00004da0| 0d 1b c6 52 e7 20 74 6f | 74 3d 2d 31 20 8c 20 74 |...R. to|t=-1 . t|
|00004db0| 6f 6f 6c 24 3d 56 6f 6c | 64 74 6f 6f 6c 24 3a 24 |ool$=Vol|dtool$:$|
|00004dc0| 70 6f 69 6e 74 25 3d 74 | 6f 6f 6c 24 3a c8 99 20 |point%=t|ool$:.. |
|00004dd0| 22 57 69 6d 70 5f 53 70 | 72 69 74 65 4f 70 22 2c |"Wimp_Sp|riteOp",|
|00004de0| 33 36 2c 2c 70 6f 69 6e | 74 25 2c 31 2c 38 2c 38 |36,,poin|t%,1,8,8|
|00004df0| 3a e1 0d 1b d0 13 21 62 | 6c 6f 63 6b 3d 63 69 72 |:.....!b|lock=cir|
|00004e00| 63 75 69 74 25 0d 1b da | 21 c8 99 22 57 69 6d 70 |cuit%...|!.."Wimp|
|00004e10| 5f 47 65 74 57 69 6e 64 | 6f 77 49 6e 66 6f 22 2c |_GetWind|owInfo",|
|00004e20| 2c 62 6c 6f 63 6b 0d 1b | e4 1b 77 6f 72 6b 78 25 |,block..|..workx%|
|00004e30| 3d 62 6c 6f 63 6b 21 34 | 2d 62 6c 6f 63 6b 21 32 |=block!4|-block!2|
|00004e40| 30 0d 1b ee 1c 77 6f 72 | 6b 79 25 3d 62 6c 6f 63 |0....wor|ky%=bloc|
|00004e50| 6b 21 31 36 2d 62 6c 6f | 63 6b 21 32 34 0d 1b f8 |k!16-blo|ck!24...|
|00004e60| 0f e3 20 48 3d 30 20 b8 | 20 74 6f 74 0d 1c 02 1a |.. H=0 .| tot....|
|00004e70| f2 77 6f 72 6b 6f 75 74 | 28 74 65 78 74 69 6e 66 |.workout|(textinf|
|00004e80| 6f 24 28 48 29 29 0d 1c | 0c 12 70 78 3d 77 6f 72 |o$(H))..|..px=wor|
|00004e90| 6b 78 25 2b 77 78 63 6f | 0d 1c 16 12 70 79 3d 77 |kx%+wxco|....py=w|
|00004ea0| 6f 72 6b 79 25 2d 77 79 | 63 6f 0d 1c 20 3c e7 20 |orky%-wy|co.. <. |
|00004eb0| 78 67 3e 70 78 20 80 20 | 78 67 3c 70 78 2b 77 77 |xg>px . |xg<px+ww|
|00004ec0| 69 64 74 68 20 80 20 79 | 67 3e 70 79 20 80 20 79 |idth . y|g>py . y|
|00004ed0| 67 3c 70 79 2b 32 34 20 | 8c 20 f2 64 65 6c 65 74 |g<py+24 |. .delet|
|00004ee0| 65 28 48 29 3a e1 0d 1c | 2a 07 ed 20 48 0d 1c 34 |e(H):...|*.. H..4|
|00004ef0| 45 74 6f 6f 6c 24 3d 56 | 6f 6c 64 74 6f 6f 6c 24 |Etool$=V|oldtool$|
|00004f00| 3a 24 70 6f 69 6e 74 25 | 3d 74 6f 6f 6c 24 3a c8 |:$point%|=tool$:.|
|00004f10| 99 20 22 57 69 6d 70 5f | 53 70 72 69 74 65 4f 70 |. "Wimp_|SpriteOp|
|00004f20| 22 2c 33 36 2c 2c 70 6f | 69 6e 74 25 2c 31 2c 38 |",36,,po|int%,1,8|
|00004f30| 2c 38 0d 1c 3e 05 e1 0d | 1c 48 11 dd f2 64 65 6c |,8..>...|.H...del|
|00004f40| 65 74 65 28 6c 65 74 29 | 0d 1c 52 13 21 62 6c 6f |ete(let)|..R.!blo|
|00004f50| 63 6b 3d 63 69 72 63 75 | 69 74 25 0d 1c 5c 21 c8 |ck=circu|it%..\!.|
|00004f60| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00004f70| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 0d 1c 66 1b |Info",,b|lock..f.|
|00004f80| 77 6f 72 6b 78 25 3d 62 | 6c 6f 63 6b 21 34 2d 62 |workx%=b|lock!4-b|
|00004f90| 6c 6f 63 6b 21 32 30 0d | 1c 70 1c 77 6f 72 6b 79 |lock!20.|.p.worky|
|00004fa0| 25 3d 62 6c 6f 63 6b 21 | 31 36 2d 62 6c 6f 63 6b |%=block!|16-block|
|00004fb0| 21 32 34 0d 1c 7a 1c f2 | 77 6f 72 6b 6f 75 74 28 |!24..z..|workout(|
|00004fc0| 74 65 78 74 69 6e 66 6f | 24 28 6c 65 74 29 29 0d |textinfo|$(let)).|
|00004fd0| 1c 84 0f e7 20 6c 65 74 | 3d 74 6f 74 20 8c 0d 1c |.... let|=tot ...|
|00004fe0| 8e 0a 74 6f 74 2d 3d 31 | 0d 1c 98 58 c8 99 20 22 |..tot-=1|...X.. "|
|00004ff0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00005000| 22 2c 2d 31 2c 77 6f 72 | 6b 78 25 2b 77 78 63 6f |",-1,wor|kx%+wxco|
|00005010| 2c 77 6f 72 6b 79 25 2d | 77 79 63 6f 2d 35 2c 77 |,worky%-|wyco-5,w|
|00005020| 6f 72 6b 78 25 2b 77 78 | 63 6f 2b 77 77 69 64 74 |orkx%+wx|co+wwidt|
|00005030| 68 2c 77 6f 72 6b 79 25 | 2d 77 79 63 6f 2b 33 32 |h,worky%|-wyco+32|
|00005040| 0d 1c a2 45 74 6f 6f 6c | 24 3d 56 6f 6c 64 74 6f |...Etool|$=Voldto|
|00005050| 6f 6c 24 3a 24 70 6f 69 | 6e 74 25 3d 74 6f 6f 6c |ol$:$poi|nt%=tool|
|00005060| 24 3a c8 99 20 22 57 69 | 6d 70 5f 53 70 72 69 74 |$:.. "Wi|mp_Sprit|
|00005070| 65 4f 70 22 2c 33 36 2c | 2c 70 6f 69 6e 74 25 2c |eOp",36,|,point%,|
|00005080| 31 2c 38 2c 38 0d 1c ac | 05 cd 0d 1c b6 0f e7 20 |1,8,8...|....... |
|00005090| 6c 65 74 3c 74 6f 74 20 | 8c 0d 1c c0 13 e3 20 56 |let<tot |...... V|
|000050a0| 3d 6c 65 74 20 b8 20 74 | 6f 74 2d 31 0d 1c ca 1f |=let . t|ot-1....|
|000050b0| 74 65 78 74 69 6e 66 6f | 24 28 56 29 3d 74 65 78 |textinfo|$(V)=tex|
|000050c0| 74 69 6e 66 6f 24 28 56 | 2b 31 29 0d 1c d4 07 ed |tinfo$(V|+1).....|
|000050d0| 20 56 0d 1c de 0a 74 6f | 74 2d 3d 31 0d 1c e8 58 | V....to|t-=1...X|
|000050e0| c8 99 20 22 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 |.. "Wimp|_ForceRe|
|000050f0| 64 72 61 77 22 2c 2d 31 | 2c 77 6f 72 6b 78 25 2b |draw",-1|,workx%+|
|00005100| 77 78 63 6f 2c 77 6f 72 | 6b 79 25 2d 77 79 63 6f |wxco,wor|ky%-wyco|
|00005110| 2d 35 2c 77 6f 72 6b 78 | 25 2b 77 78 63 6f 2b 77 |-5,workx|%+wxco+w|
|00005120| 77 69 64 74 68 2c 77 6f | 72 6b 79 25 2d 77 79 63 |width,wo|rky%-wyc|
|00005130| 6f 2b 33 32 0d 1c f2 45 | 74 6f 6f 6c 24 3d 56 6f |o+32...E|tool$=Vo|
|00005140| 6c 64 74 6f 6f 6c 24 3a | 24 70 6f 69 6e 74 25 3d |ldtool$:|$point%=|
|00005150| 74 6f 6f 6c 24 3a c8 99 | 20 22 57 69 6d 70 5f 53 |tool$:..| "Wimp_S|
|00005160| 70 72 69 74 65 4f 70 22 | 2c 33 36 2c 2c 70 6f 69 |priteOp"|,36,,poi|
|00005170| 6e 74 25 2c 31 2c 38 2c | 38 0d 1c fc 05 cd 0d 1d |nt%,1,8,|8.......|
|00005180| 06 05 e1 0d 1d 10 0e dd | f2 6d 6f 64 65 70 72 6f |........|.modepro|
|00005190| 63 0d 1d 1a 2f c8 99 20 | 26 32 45 2c 32 35 36 2b |c.../.. |&2E,256+|
|000051a0| 34 30 2c 73 70 72 25 2c | 22 6c 65 64 72 22 20 b8 |40,spr%,|"ledr" .|
|000051b0| 20 2c 2c 2c 77 25 2c 68 | 25 2c 2c 6d 6f 64 65 25 | ,,,w%,h|%,,mode%|
|000051c0| 0d 1d 24 2c c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |..$,.."O|S_ReadMo|
|000051d0| 64 65 56 61 72 69 61 62 | 6c 65 22 2c 6d 6f 64 65 |deVariab|le",mode|
|000051e0| 25 2c 34 20 b8 2c 2c 78 | 65 69 67 25 0d 1d 2e 2c |%,4 .,,x|eig%...,|
|000051f0| c8 99 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |.."OS_Re|adModeVa|
|00005200| 72 69 61 62 6c 65 22 2c | 6d 6f 64 65 25 2c 35 20 |riable",|mode%,5 |
|00005210| b8 2c 2c 79 65 69 67 25 | 0d 1d 38 11 77 69 25 3d |.,,yeig%|..8.wi%=|
|00005220| 77 25 3c 3c 78 65 69 67 | 25 0d 1d 42 11 68 65 25 |w%<<xeig|%..B.he%|
|00005230| 3d 68 25 3c 3c 79 65 69 | 67 25 0d 1d 4c 23 c8 99 |=h%<<yei|g%..L#..|
|00005240| 26 34 30 37 34 30 2c 6d | 6f 64 65 25 2c 30 2c 2d |&40740,m|ode%,0,-|
|00005250| 31 2c 30 2c 73 63 61 6c | 62 6c 6f 63 6b 0d 1d 56 |1,0,scal|block..V|
|00005260| 25 c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 |%.."OS_R|eadModeV|
|00005270| 61 72 69 61 62 6c 65 22 | 2c eb 2c 31 31 20 b8 2c |ariable"|,.,11 .,|
|00005280| 2c 6f 0d 1d 60 25 c8 99 | 22 4f 53 5f 52 65 61 64 |,o..`%..|"OS_Read|
|00005290| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c eb 2c |ModeVari|able",.,|
|000052a0| 31 32 20 b8 2c 2c 70 0d | 1d 6a 0d 6f 2b 3d 31 3a |12 .,,p.|.j.o+=1:|
|000052b0| 70 2b 3d 31 0d 1d 74 1b | e7 20 70 2f 6f 3d 2e 38 |p+=1..t.|. p/o=.8|
|000052c0| 20 80 20 eb 3c 3e 31 33 | 20 8c 20 73 73 3d 31 0d | . .<>13| . ss=1.|
|000052d0| 1d 7e 1c e7 20 70 2f 6f | 3d 2e 37 35 20 80 20 eb |.~.. p/o|=.75 . .|
|000052e0| 3c 3e 31 33 20 8c 20 73 | 73 3d 31 0d 1d 88 25 e7 |<>13 . s|s=1...%.|
|000052f0| 20 70 2f 6f 3c 3e 2e 38 | 20 80 20 70 2f 6f 3c 3e | p/o<>.8| . p/o<>|
|00005300| 2e 37 35 20 84 20 eb 3d | 31 33 20 73 73 3d 2e 35 |.75 . .=|13 ss=.5|
|00005310| 0d 1d 92 3c 21 73 63 61 | 6c 3d 77 69 25 3a 73 63 |...<!sca|l=wi%:sc|
|00005320| 61 6c 21 34 3d 68 65 25 | 3a 73 63 61 6c 21 38 3d |al!4=he%|:scal!8=|
|00005330| 77 25 3c 3c 28 31 2f 31 | 29 3a 73 63 61 6c 21 31 |w%<<(1/1|):scal!1|
|00005340| 32 3d 68 25 3c 3c 28 31 | 2f 73 73 29 0d 1d 9c 05 |2=h%<<(1|/ss)....|
|00005350| e1 0d 1d a6 0a dd f2 70 | 61 6e 65 0d 1d b0 0f e7 |.......p|ane.....|
|00005360| 20 74 6f 6f 6c 73 6f 6e | 20 8c 0d 1d ba 33 78 31 | toolson| ....3x1|
|00005370| 3d 62 6c 6f 63 6b 21 34 | 2d 32 35 30 3a 78 32 3d |=block!4|-250:x2=|
|00005380| 78 31 2b 32 34 38 3a 79 | 31 3d 62 6c 6f 63 6b 21 |x1+248:y|1=block!|
|00005390| 38 3a 79 32 3d 62 6c 6f | 63 6b 21 31 36 0d 1d c4 |8:y2=blo|ck!16...|
|000053a0| 0e 73 69 7a 65 3d 78 32 | 2d 78 31 0d 1d ce 3d 70 |.size=x2|-x1...=p|
|000053b0| 25 3d 62 6c 6f 63 6b 21 | 32 38 3a 21 69 63 6f 6e |%=block!|28:!icon|
|000053c0| 64 3d 74 6f 6f 6c 62 6f | 78 25 3a c8 99 22 57 69 |d=toolbo|x%:.."Wi|
|000053d0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 49 6e 66 6f |mp_GetWi|ndowInfo|
|000053e0| 22 2c 2c 69 63 6f 6e 64 | 0d 1d d8 19 e7 20 78 31 |",,icond|..... x1|
|000053f0| 3c 30 20 8c 20 78 31 3d | 30 3a 78 32 3d 73 69 7a |<0 . x1=|0:x2=siz|
|00005400| 65 0d 1d e2 42 69 63 6f | 6e 64 21 34 3d 78 31 3a |e...Bico|nd!4=x1:|
|00005410| 69 63 6f 6e 64 21 38 3d | 79 32 2d 33 30 38 3a 69 |icond!8=|y2-308:i|
|00005420| 63 6f 6e 64 21 31 32 3d | 78 32 3a 69 63 6f 6e 64 |cond!12=|x2:icond|
|00005430| 21 31 36 3d 79 32 3a 69 | 63 6f 6e 64 21 32 38 3d |!16=y2:i|cond!28=|
|00005440| 70 25 3a 0d 1d ec 1e c8 | 99 22 57 69 6d 70 5f 4f |p%:.....|."Wimp_O|
|00005450| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 69 63 6f 6e |penWindo|w",,icon|
|00005460| 64 0d 1d f6 30 62 6c 6f | 63 6b 21 32 38 3d 74 6f |d...0blo|ck!28=to|
|00005470| 6f 6c 62 6f 78 25 3a c8 | 99 22 57 69 6d 70 5f 4f |olbox%:.|."Wimp_O|
|00005480| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|00005490| 6b 0d 1e 00 05 cd 0d 1e | 0a 1e c8 99 22 57 69 6d |k.......|...."Wim|
|000054a0| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|000054b0| 6c 6f 63 6b 0d 1e 14 05 | e1 0d 1e 1e 13 dd f2 74 |lock....|.......t|
|000054c0| 6f 6f 6c 62 6f 78 28 66 | 6c 61 67 29 0d 1e 28 3b |oolbox(f|lag)..(;|
|000054d0| e7 20 66 6c 61 67 3d 2d | 31 20 8c 20 21 62 6c 6f |. flag=-|1 . !blo|
|000054e0| 63 6b 3d 74 6f 6f 6c 62 | 6f 78 25 3a c8 99 22 57 |ck=toolb|ox%:.."W|
|000054f0| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00005500| 2c 2c 62 6c 6f 63 6b 0d | 1e 32 0e e7 20 66 6c 61 |,,block.|.2.. fla|
|00005510| 67 3d 31 20 8c 0d 1e 3c | 13 21 62 6c 6f 63 6b 3d |g=1 ...<|.!block=|
|00005520| 63 69 72 63 75 69 74 25 | 0d 1e 46 22 c8 99 22 57 |circuit%|..F".."W|
|00005530| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00005540| 74 65 22 2c 2c 62 6c 6f | 63 6b 0d 1e 50 1b 6f 70 |te",,blo|ck..P.op|
|00005550| 65 6e 3d 62 6c 6f 63 6b | 21 33 32 20 80 20 28 31 |en=block|!32 . (1|
|00005560| 3c 3c 31 36 29 0d 1e 5a | 25 e7 20 6f 70 65 6e 3c |<<16)..Z|%. open<|
|00005570| 3e 30 20 8c 20 21 69 63 | 6f 6e 64 3d 63 69 72 63 |>0 . !ic|ond=circ|
|00005580| 75 69 74 25 3a f2 70 61 | 6e 65 0d 1e 64 05 cd 0d |uit%:.pa|ne..d...|
|00005590| 1e 6e 05 e1 0d 1e 78 11 | dd f2 65 72 72 6f 72 28 |.n....x.|..error(|
|000055a0| 65 72 72 24 29 0d 1e 82 | 4d 21 69 63 6f 6e 64 3d |err$)...|M!icond=|
|000055b0| 30 3a 24 28 69 63 6f 6e | 64 2b 34 29 3d 65 72 72 |0:$(icon|d+4)=err|
|000055c0| 24 2b 22 2e 22 2b 22 20 | 50 72 65 73 73 20 4f 4b |$+"."+" |Press OK|
|000055d0| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 20 6f 72 20 | to cont|inue or |
|000055e0| 43 61 6e 63 65 6c 20 74 | 6f 20 71 75 69 74 22 2b |Cancel t|o quit"+|
|000055f0| bd 30 0d 1e 8c 32 c8 99 | 22 57 69 6d 70 5f 52 65 |.0...2..|"Wimp_Re|
|00005600| 70 6f 72 74 45 72 72 6f | 72 22 2c 69 63 6f 6e 64 |portErro|r",icond|
|00005610| 2c 33 2c 22 21 43 69 72 | 63 75 69 74 22 20 b8 20 |,3,"!Cir|cuit" . |
|00005620| 2c 62 75 74 0d 1e 96 34 | e7 20 62 75 74 3d 32 20 |,but...4|. but=2 |
|00005630| 8c 20 c8 99 72 65 69 6e | 74 65 72 2c 6d 79 74 61 |. ..rein|ter,myta|
|00005640| 73 6b 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |sk%:.."W|imp_Clos|
|00005650| 65 44 6f 77 6e 22 3a e0 | 0d 1e a0 05 e1 0d 1e aa |eDown":.|........|
|00005660| 10 dd f2 61 72 65 79 6f | 75 73 75 72 65 0d 1e b4 |...areyo|usure...|
|00005670| 0d e7 20 73 61 76 65 64 | 20 8c 0d 1e be 13 f2 6f |.. saved| ......o|
|00005680| 70 65 6e 77 69 6e 28 71 | 75 69 74 25 29 0d 1e c8 |penwin(q|uit%)...|
|00005690| 07 ef 20 37 0d 1e d2 31 | f2 69 6e 66 6f 28 71 75 |.. 7...1|.info(qu|
|000056a0| 69 74 25 2c 31 2c 22 59 | 6f 75 72 20 66 69 6c 65 |it%,1,"Y|our file|
|000056b0| 20 68 61 73 20 62 65 65 | 6e 20 6d 6f 64 69 66 69 | has bee|n modifi|
|000056c0| 65 64 2e 22 29 0d 1e dc | 4d 21 62 6c 6f 63 6b 3d |ed.")...|M!block=|
|000056d0| 31 33 30 3a 62 6c 6f 63 | 6b 21 34 3d 31 33 31 3a |130:bloc|k!4=131:|
|000056e0| 62 6c 6f 63 6b 21 38 3d | 2d 31 3a c8 99 22 4f 53 |block!8=|-1:.."OS|
|000056f0| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00005700| 73 22 2c 62 6c 6f 63 6b | 2c 62 6c 6f 63 6b 2b 31 |s",block|,block+1|
|00005710| 32 38 0d 1e e6 25 c8 99 | 22 4f 53 5f 52 65 61 64 |28...%..|"OS_Read|
|00005720| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c eb 2c |ModeVari|able",.,|
|00005730| 34 20 b8 20 2c 2c 78 0d | 1e f0 25 c8 99 22 4f 53 |4 . ,,x.|..%.."OS|
|00005740| 5f 52 65 61 64 4d 6f 64 | 65 56 61 72 69 61 62 6c |_ReadMod|eVariabl|
|00005750| 65 22 2c eb 2c 35 20 b8 | 20 2c 2c 79 0d 1e fa 39 |e",.,5 .| ,,y...9|
|00005760| c8 97 20 c8 93 20 30 2c | 30 2c 28 28 28 62 6c 6f |.. .. 0,|0,(((blo|
|00005770| 63 6b 21 31 32 38 29 2b | 31 29 2a 32 5e 78 29 2d |ck!128)+|1)*2^x)-|
|00005780| 31 2c 28 28 62 6c 6f 63 | 6b 21 31 33 32 29 2b 31 |1,((bloc|k!132)+1|
|00005790| 29 2a 32 5e 79 0d 1f 04 | 05 cd 0d 1f 0e 34 e7 20 |)*2^y...|.....4. |
|000057a0| ac 20 73 61 76 65 64 20 | c8 99 72 65 69 6e 74 65 |. saved |..reinte|
|000057b0| 72 2c 6d 79 74 61 73 6b | 25 3a c8 99 22 57 69 6d |r,mytask|%:.."Wim|
|000057c0| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 3a e0 0d 1f |p_CloseD|own":...|
|000057d0| 18 05 e1 0d 1f 22 10 dd | f2 71 75 65 72 79 28 71 |....."..|.query(q|
|000057e0| 75 24 29 0d 1f 2c 14 f2 | 6f 70 65 6e 77 69 6e 28 |u$)..,..|openwin(|
|000057f0| 71 75 65 72 79 25 29 0d | 1f 36 07 ef 20 37 0d 1f |query%).|.6.. 7..|
|00005800| 40 11 21 62 6c 6f 63 6b | 3d 71 75 65 72 79 25 0d |@.!block|=query%.|
|00005810| 1f 4a 21 c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |.J!.."Wi|mp_GetWi|
|00005820| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 62 6c 6f 63 6b |ndowInfo|",,block|
|00005830| 0d 1f 54 1b 77 6f 72 6b | 78 25 3d 62 6c 6f 63 6b |..T.work|x%=block|
|00005840| 21 31 32 2d 62 6c 6f 63 | 6b 21 34 0d 1f 5e 1b 77 |!12-bloc|k!4..^.w|
|00005850| 6f 72 6b 79 25 3d 62 6c | 6f 63 6b 21 31 36 2d 62 |orky%=bl|ock!16-b|
|00005860| 6c 6f 63 6b 21 38 0d 1f | 68 27 c8 97 20 c8 93 20 |lock!8..|h'.. .. |
|00005870| 62 6c 6f 63 6b 21 34 2c | 62 6c 6f 63 6b 21 38 2c |block!4,|block!8,|
|00005880| 77 6f 72 6b 78 25 2c 77 | 6f 72 6b 79 25 0d 1f 72 |workx%,w|orky%..r|
|00005890| 17 f2 69 6e 66 6f 28 71 | 75 65 72 79 25 2c 31 2c |..info(q|uery%,1,|
|000058a0| 71 75 24 29 0d 1f 7c 05 | e1 0d 1f 86 0a dd f2 65 |qu$)..|.|.......e|
|000058b0| 6e 64 71 0d 1f 90 12 f2 | 63 6c 6f 73 65 28 71 75 |ndq.....|close(qu|
|000058c0| 65 72 79 25 29 0d 1f 9a | 4d 21 62 6c 6f 63 6b 3d |ery%)...|M!block=|
|000058d0| 31 33 30 3a 62 6c 6f 63 | 6b 21 34 3d 31 33 31 3a |130:bloc|k!4=131:|
|000058e0| 62 6c 6f 63 6b 21 38 3d | 2d 31 3a c8 99 22 4f 53 |block!8=|-1:.."OS|
|000058f0| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00005900| 73 22 2c 62 6c 6f 63 6b | 2c 62 6c 6f 63 6b 2b 31 |s",block|,block+1|
|00005910| 32 38 0d 1f a4 25 c8 99 | 22 4f 53 5f 52 65 61 64 |28...%..|"OS_Read|
|00005920| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c eb 2c |ModeVari|able",.,|
|00005930| 34 20 b8 20 2c 2c 78 0d | 1f ae 25 c8 99 22 4f 53 |4 . ,,x.|..%.."OS|
|00005940| 5f 52 65 61 64 4d 6f 64 | 65 56 61 72 69 61 62 6c |_ReadMod|eVariabl|
|00005950| 65 22 2c eb 2c 35 20 b8 | 20 2c 2c 79 0d 1f b8 39 |e",.,5 .| ,,y...9|
|00005960| c8 97 20 c8 93 20 30 2c | 30 2c 28 28 28 62 6c 6f |.. .. 0,|0,(((blo|
|00005970| 63 6b 21 31 32 38 29 2b | 31 29 2a 32 5e 78 29 2d |ck!128)+|1)*2^x)-|
|00005980| 31 2c 28 28 62 6c 6f 63 | 6b 21 31 33 32 29 2b 31 |1,((bloc|k!132)+1|
|00005990| 29 2a 32 5e 79 0d 1f c2 | 05 e1 0d 1f cc 13 dd f2 |)*2^y...|........|
|000059a0| 63 6c 6f 73 65 28 21 62 | 6c 6f 63 6b 29 0d 1f d6 |close(!b|lock)...|
|000059b0| 1f c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |..."Wimp|_CloseWi|
|000059c0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 0d 1f e0 05 |ndow",,b|lock....|
|000059d0| e1 0d 1f ea 13 dd f2 64 | 72 61 67 73 70 72 28 66 |.......d|ragspr(f|
|000059e0| 6c 61 67 29 0d 1f f4 0f | e7 20 64 72 61 67 73 70 |lag)....|. dragsp|
|000059f0| 72 20 8c 0d 1f fe 0d c8 | 8e 20 66 6c 61 67 20 ca |r ......|. flag .|
|00005a00| 0d 20 08 08 c9 20 31 3a | 0d 20 12 3b 21 62 6c 6f |. ... 1:|. .;!blo|
|00005a10| 63 6b 3d 77 69 6e 73 61 | 76 65 25 3a 62 6c 6f 63 |ck=winsa|ve%:bloc|
|00005a20| 6b 21 34 3d 32 3a c8 99 | 20 22 57 69 6d 70 5f 47 |k!4=2:..| "Wimp_G|
|00005a30| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00005a40| 6f 63 6b 0d 20 1c 2b 62 | 6c 6f 63 6b 21 38 3d 30 |ock. .+b|lock!8=0|
|00005a50| 3a 62 6c 6f 63 6b 21 31 | 32 3d 30 3a 24 28 62 6c |:block!1|2=0:$(bl|
|00005a60| 6f 63 6b 21 33 32 29 3d | 69 6e 64 69 72 24 0d 20 |ock!32)=|indir$. |
|00005a70| 26 21 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 49 63 |&!.. "Wi|mp_SetIc|
|00005a80| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 0d |onState"|,,block.|
|00005a90| 20 30 19 c8 99 20 22 44 | 72 61 67 41 53 70 72 69 | 0... "D|ragASpri|
|00005aa0| 74 65 5f 53 74 6f 70 22 | 0d 20 3a 09 c9 20 2d 31 |te_Stop"|. :.. -1|
|00005ab0| 3a 0d 20 44 3b 21 62 6c | 6f 63 6b 3d 77 69 6e 73 |:. D;!bl|ock=wins|
|00005ac0| 61 76 65 25 3a 62 6c 6f | 63 6b 21 34 3d 32 3a c8 |ave%:blo|ck!4=2:.|
|00005ad0| 99 20 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |. "Wimp_|GetIconS|
|00005ae0| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 0d 20 4e 16 |tate",,b|lock. N.|
|00005af0| 69 6e 64 69 72 24 3d 24 | 28 62 6c 6f 63 6b 21 33 |indir$=$|(block!3|
|00005b00| 32 29 0d 20 58 28 62 6c | 6f 63 6b 21 38 3d 30 3a |2). X(bl|ock!8=0:|
|00005b10| 62 6c 6f 63 6b 21 31 32 | 3d 30 3a 24 28 62 6c 6f |block!12|=0:$(blo|
|00005b20| 63 6b 21 33 32 29 3d bd | 31 33 0d 20 62 21 c8 99 |ck!32)=.|13. b!..|
|00005b30| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00005b40| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 0d 20 6c 05 cb |ate",,bl|ock. l..|
|00005b50| 0d 20 76 05 cd 0d 20 80 | 05 e1 0d 20 8a 11 dd f2 |. v... .|... ....|
|00005b60| 73 63 72 6f 6c 6c 28 78 | 2c 79 29 0d 20 94 0b e7 |scroll(x|,y). ...|
|00005b70| 20 78 3d 30 20 8c 0d 20 | 9e 0a c8 8e 20 79 20 ca | x=0 .. |.... y .|
|00005b80| 0d 20 a8 08 c9 20 31 3a | 0d 20 b2 1b 62 75 66 66 |. ... 1:|. ..buff|
|00005b90| 65 72 32 24 3d 70 73 65 | 74 24 28 30 2c 67 72 69 |er2$=pse|t$(0,gri|
|00005ba0| 64 79 29 0d 20 bc 13 e3 | 20 4a 3d 30 20 b8 20 67 |dy). ...| J=0 . g|
|00005bb0| 72 69 64 78 2d 31 0d 20 | c6 1f 62 75 66 66 65 72 |ridx-1. |..buffer|
|00005bc0| 32 24 3d 70 73 65 74 24 | 28 67 72 69 64 78 2d 4a |2$=pset$|(gridx-J|
|00005bd0| 2d 31 2c 30 29 0d 20 d0 | 11 e3 20 49 3d 31 20 b8 |-1,0). .|.. I=1 .|
|00005be0| 20 67 72 69 64 79 0d 20 | da 24 62 75 66 66 65 72 | gridy. |.$buffer|
|00005bf0| 24 3d 70 73 65 74 24 28 | 67 72 69 64 78 2d 4a 2d |$=pset$(|gridx-J-|
|00005c00| 31 2c 67 72 69 64 79 2d | 49 29 0d 20 e4 25 70 73 |1,gridy-|I). .%ps|
|00005c10| 65 74 24 28 67 72 69 64 | 78 2d 4a 2d 31 2c 67 72 |et$(grid|x-J-1,gr|
|00005c20| 69 64 79 2d 49 29 3d 62 | 75 66 66 65 72 32 24 0d |idy-I)=b|uffer2$.|
|00005c30| 20 ee 14 62 75 66 66 65 | 72 32 24 3d 62 75 66 66 | ..buffe|r2$=buff|
|00005c40| 65 72 24 0d 20 f8 05 ed | 0d 21 02 05 ed 0d 21 0c |er$. ...|.!....!.|
|00005c50| 0e e7 20 74 6f 74 3e 2d | 31 20 8c 0d 21 16 0f e3 |.. tot>-|1 ..!...|
|00005c60| 20 49 3d 30 20 b8 20 74 | 6f 74 0d 21 20 1a f2 77 | I=0 . t|ot.! ..w|
|00005c70| 6f 72 6b 6f 75 74 28 74 | 65 78 74 69 6e 66 6f 24 |orkout(t|extinfo$|
|00005c80| 28 49 29 29 0d 21 2a 28 | 70 79 3d 77 79 63 6f 2d |(I)).!*(|py=wyco-|
|00005c90| 36 32 3a e7 20 70 79 3c | 30 20 8c 20 70 79 3d 70 |62:. py<|0 . py=p|
|00005ca0| 79 2b 28 67 72 69 64 79 | 2a 36 32 29 0d 21 34 35 |y+(gridy|*62).!45|
|00005cb0| 74 65 78 74 69 6e 66 6f | 24 28 49 29 3d 77 74 65 |textinfo|$(I)=wte|
|00005cc0| 78 74 24 2b 22 2c 22 2b | c3 77 78 63 6f 2b 22 2c |xt$+","+|.wxco+",|
|00005cd0| 22 2b c3 70 79 2b 22 2c | 22 2b c3 77 77 69 64 74 |"+.py+",|"+.wwidt|
|00005ce0| 68 0d 21 3e 05 ed 0d 21 | 48 05 cd 0d 21 52 09 c9 |h.!>...!|H...!R..|
|00005cf0| 20 2d 31 3a 0d 21 5c 1b | 62 75 66 66 65 72 32 24 | -1:.!\.|buffer2$|
|00005d00| 3d 70 73 65 74 24 28 30 | 2c 67 72 69 64 79 29 0d |=pset$(0|,gridy).|
|00005d10| 21 66 13 e3 20 4a 3d 30 | 20 b8 20 67 72 69 64 78 |!f.. J=0| . gridx|
|00005d20| 2d 31 0d 21 70 25 62 75 | 66 66 65 72 32 24 3d 70 |-1.!p%bu|ffer2$=p|
|00005d30| 73 65 74 24 28 67 72 69 | 64 78 2d 4a 2d 31 2c 67 |set$(gri|dx-J-1,g|
|00005d40| 72 69 64 79 2d 31 29 0d | 21 7a 13 e3 20 49 3d 30 |ridy-1).|!z.. I=0|
|00005d50| 20 b8 20 67 72 69 64 79 | 2d 31 0d 21 84 1e 62 75 | . gridy|-1.!..bu|
|00005d60| 66 66 65 72 24 3d 70 73 | 65 74 24 28 67 72 69 64 |ffer$=ps|et$(grid|
|00005d70| 78 2d 4a 2d 31 2c 49 29 | 0d 21 8e 1f 70 73 65 74 |x-J-1,I)|.!..pset|
|00005d80| 24 28 67 72 69 64 78 2d | 4a 2d 31 2c 49 29 3d 62 |$(gridx-|J-1,I)=b|
|00005d90| 75 66 66 65 72 32 24 0d | 21 98 14 62 75 66 66 65 |uffer2$.|!..buffe|
|00005da0| 72 32 24 3d 62 75 66 66 | 65 72 24 0d 21 a2 05 ed |r2$=buff|er$.!...|
|00005db0| 0d 21 ac 05 ed 0d 21 b6 | 0e e7 20 74 6f 74 3e 2d |.!....!.|.. tot>-|
|00005dc0| 31 20 8c 0d 21 c0 0f e3 | 20 49 3d 30 20 b8 20 74 |1 ..!...| I=0 . t|
|00005dd0| 6f 74 0d 21 ca 1a f2 77 | 6f 72 6b 6f 75 74 28 74 |ot.!...w|orkout(t|
|00005de0| 65 78 74 69 6e 66 6f 24 | 28 49 29 29 0d 21 d4 2f |extinfo$|(I)).!./|
|00005df0| 70 79 3d 77 79 63 6f 2b | 36 32 3a e7 20 70 79 3e |py=wyco+|62:. py>|
|00005e00| 67 72 69 64 79 2a 36 32 | 20 8c 20 70 79 3d 70 79 |gridy*62| . py=py|
|00005e10| 2d 28 67 72 69 64 79 2a | 36 32 29 0d 21 de 35 74 |-(gridy*|62).!.5t|
|00005e20| 65 78 74 69 6e 66 6f 24 | 28 49 29 3d 77 74 65 78 |extinfo$|(I)=wtex|
|00005e30| 74 24 2b 22 2c 22 2b c3 | 77 78 63 6f 2b 22 2c 22 |t$+","+.|wxco+","|
|00005e40| 2b c3 70 79 2b 22 2c 22 | 2b c3 77 77 69 64 74 68 |+.py+","|+.wwidth|
|00005e50| 0d 21 e8 05 ed 0d 21 f2 | 05 cd 0d 21 fc 05 cb 0d |.!....!.|...!....|
|00005e60| 22 06 05 cd 0d 22 10 0b | e7 20 79 3d 30 20 8c 0d |"...."..|. y=0 ..|
|00005e70| 22 1a 0a c8 8e 20 78 20 | ca 0d 22 24 07 c9 20 31 |".... x |.."$.. 1|
|00005e80| 0d 22 2e 1b 62 75 66 66 | 65 72 32 24 3d 70 73 65 |."..buff|er2$=pse|
|00005e90| 74 24 28 30 2c 67 72 69 | 64 79 29 0d 22 38 11 e3 |t$(0,gri|dy)."8..|
|00005ea0| 20 49 3d 30 20 b8 20 67 | 72 69 64 79 0d 22 42 1d | I=0 . g|ridy."B.|
|00005eb0| 62 75 66 66 65 72 32 24 | 3d 70 73 65 74 24 28 30 |buffer2$|=pset$(0|
|00005ec0| 2c 67 72 69 64 79 2d 49 | 29 0d 22 4c 13 e3 20 4a |,gridy-I|)."L.. J|
|00005ed0| 3d 30 20 b8 20 67 72 69 | 64 78 2d 31 0d 22 56 24 |=0 . gri|dx-1."V$|
|00005ee0| 62 75 66 66 65 72 24 3d | 70 73 65 74 24 28 67 72 |buffer$=|pset$(gr|
|00005ef0| 69 64 78 2d 4a 2d 31 2c | 67 72 69 64 79 2d 49 29 |idx-J-1,|gridy-I)|
|00005f00| 0d 22 60 25 70 73 65 74 | 24 28 67 72 69 64 78 2d |."`%pset|$(gridx-|
|00005f10| 4a 2d 31 2c 67 72 69 64 | 79 2d 49 29 3d 62 75 66 |J-1,grid|y-I)=buf|
|00005f20| 66 65 72 32 24 0d 22 6a | 14 62 75 66 66 65 72 32 |fer2$."j|.buffer2|
|00005f30| 24 3d 62 75 66 66 65 72 | 24 0d 22 74 05 ed 0d 22 |$=buffer|$."t..."|
|00005f40| 7e 05 ed 0d 22 88 0e e7 | 20 74 6f 74 3e 2d 31 20 |~..."...| tot>-1 |
|00005f50| 8c 0d 22 92 0f e3 20 49 | 3d 30 20 b8 20 74 6f 74 |.."... I|=0 . tot|
|00005f60| 0d 22 9c 1a f2 77 6f 72 | 6b 6f 75 74 28 74 65 78 |."...wor|kout(tex|
|00005f70| 74 69 6e 66 6f 24 28 49 | 29 29 0d 22 a6 28 70 78 |tinfo$(I|)).".(px|
|00005f80| 3d 77 78 63 6f 2d 36 32 | 3a e7 20 70 78 3c 30 20 |=wxco-62|:. px<0 |
|00005f90| 8c 20 70 78 3d 70 78 2b | 28 67 72 69 64 78 2a 36 |. px=px+|(gridx*6|
|00005fa0| 32 29 0d 22 b0 35 74 65 | 78 74 69 6e 66 6f 24 28 |2).".5te|xtinfo$(|
|00005fb0| 49 29 3d 77 74 65 78 74 | 24 2b 22 2c 22 2b c3 70 |I)=wtext|$+","+.p|
|00005fc0| 78 2b 22 2c 22 2b c3 77 | 79 63 6f 2b 22 2c 22 2b |x+","+.w|yco+","+|
|00005fd0| c3 77 77 69 64 74 68 0d | 22 ba 05 ed 0d 22 c4 05 |.wwidth.|"...."..|
|00005fe0| cd 0d 22 ce 08 c9 20 2d | 31 0d 22 d8 21 62 75 66 |.."... -|1.".!buf|
|00005ff0| 66 65 72 32 24 3d 70 73 | 65 74 24 28 67 72 69 64 |fer2$=ps|et$(grid|
|00006000| 78 2d 31 2c 67 72 69 64 | 79 29 0d 22 e2 11 e3 20 |x-1,grid|y)."... |
|00006010| 49 3d 30 20 b8 20 67 72 | 69 64 79 0d 22 ec 23 62 |I=0 . gr|idy.".#b|
|00006020| 75 66 66 65 72 32 24 3d | 70 73 65 74 24 28 67 72 |uffer2$=|pset$(gr|
|00006030| 69 64 78 2d 31 2c 67 72 | 69 64 79 2d 49 29 0d 22 |idx-1,gr|idy-I)."|
|00006040| f6 11 e3 20 4a 3d 30 20 | b8 20 67 72 69 64 78 0d |... J=0 |. gridx.|
|00006050| 23 00 1c 62 75 66 66 65 | 72 24 3d 70 73 65 74 24 |#..buffe|r$=pset$|
|00006060| 28 4a 2c 67 72 69 64 79 | 2d 49 29 0d 23 0a 1d 70 |(J,gridy|-I).#..p|
|00006070| 73 65 74 24 28 4a 2c 67 | 72 69 64 79 2d 49 29 3d |set$(J,g|ridy-I)=|
|00006080| 62 75 66 66 65 72 32 24 | 0d 23 14 14 62 75 66 66 |buffer2$|.#..buff|
|00006090| 65 72 32 24 3d 62 75 66 | 66 65 72 24 0d 23 1e 05 |er2$=buf|fer$.#..|
|000060a0| ed 0d 23 28 05 ed 0d 23 | 32 0e e7 20 74 6f 74 3e |..#(...#|2.. tot>|
|000060b0| 2d 31 20 8c 0d 23 3c 0f | e3 20 49 3d 30 20 b8 20 |-1 ..#<.|. I=0 . |
|000060c0| 74 6f 74 0d 23 46 1a f2 | 77 6f 72 6b 6f 75 74 28 |tot.#F..|workout(|
|000060d0| 74 65 78 74 69 6e 66 6f | 24 28 49 29 29 0d 23 50 |textinfo|$(I)).#P|
|000060e0| 2f 70 78 3d 77 78 63 6f | 2b 36 32 3a e7 20 70 78 |/px=wxco|+62:. px|
|000060f0| 3c 67 72 69 64 78 2a 36 | 32 20 8c 20 70 78 3d 70 |<gridx*6|2 . px=p|
|00006100| 78 2d 28 67 72 69 64 78 | 2a 36 32 29 0d 23 5a 35 |x-(gridx|*62).#Z5|
|00006110| 74 65 78 74 69 6e 66 6f | 24 28 49 29 3d 77 74 65 |textinfo|$(I)=wte|
|00006120| 78 74 24 2b 22 2c 22 2b | c3 70 78 2b 22 2c 22 2b |xt$+","+|.px+","+|
|00006130| c3 77 79 63 6f 2b 22 2c | 22 2b c3 77 77 69 64 74 |.wyco+",|"+.wwidt|
|00006140| 68 0d 23 64 05 ed 0d 23 | 6e 05 cd 0d 23 78 05 cb |h.#d...#|n...#x..|
|00006150| 0d 23 82 05 cd 0d 23 8c | 15 f2 72 65 64 72 61 77 |.#....#.|..redraw|
|00006160| 28 63 69 72 63 75 69 74 | 25 29 0d 23 96 05 e1 0d |(circuit|%).#....|
|00006170| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+
